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

Question

Информатика

Алюся

7 октября, 12:31

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

+5

Ответы (1)

Знаете ответ на вопрос?

Авдоким · Answer 1

Var

s:string;

begin

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

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

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

end.