Дана строка.Написать программу для вывода ** экран длины этой строки

Question

Дана строка.Написать программу для вывода на экран длины этой строки

Answer 1

Var s:string;
begin
readln(s);
writeln('Длина строки = ',length(s));
end.

Пример:
one, two, three
Длина строки = 15