Составьте алгоритм для определения количества цифр в записи произвольного натурального числа

Лови
var
s:string;
a:integer;
begin
write(Введите натуральное число - );
readln(s);
a:=length(s);
writeln(В числе ,a, цифр.);
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку