Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

Var
   s:string;
begin
   Write(Введите строку: ); Read(s);
   Writeln(Длина строки равна ,Length(s));
   Writeln(Первый символ- ,s[1],, последний- ,s[Length(s)])
end.