Ответы
Ответ дал:
0
var s:string;
begin
write('Введите слово: ');
readln(s);
writeln('Количество символов = ',length(s));
end.
Пример:
Введите слово: клавиатура
Количество символов = 10
begin
write('Введите слово: ');
readln(s);
writeln('Количество символов = ',length(s));
end.
Пример:
Введите слово: клавиатура
Количество символов = 10
Вас заинтересует
2 года назад
2 года назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад