var s:string; begin write('Введите символы:'); read(s); write('Вы ввели - ',s,', длинной - ',length(s),' символов'); end.
var s:string;
begin
write('Введите символы:');
read(s);
write('Вы ввели - ',s,', длинной - ',length(s),' символов');
end.
var s:string;
begin
write('Введите символы:');
read(s);
write('Вы ввели - ',s,', длинной - ',length(s),' символов');
end.