дана строка. Написать программу, выводящую на экран её длину и пятый символ. ​

Ответ:

var s:string;

begin

readln (s);

writeln (length(s));

write (s[5])

end.

или

var s:string;

begin

s:='qwertyuiop';

writeln (length(s));

write (s[5])

end.