Введите строку символов; определите и выведите на экран ее длину. выведите на экран первый и последний символ этой строки (через Паскаль)

Question

Информатика

Арсен

6 июня, 14:44

Введите строку символов; определите и выведите на экран ее длину. выведите на экран первый и последний символ этой строки (через Паскаль)

+3

Ответы (1)

Знаете ответ?

Георгина · Answer 1

Var

s:string;

begin

Write ('Введите строку: ') ; Read (s) ;

Writeln ('Длина строки равна ', Length (s)) ;

Writeln ('Первый символ - ', s[1],', последний - ', s[Length (s) ])

end.