Составьте алгоритм для определения количества цифр в записи произвольного натурального числа (для программы Паскаль)
Var x:integer;
begin
readln(x);
writeln(length(inttostr(x)))
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var x:integer;
begin
readln(x);
writeln(length(inttostr(x)))
end.