Есть ответ 👍

Написать программу находящую количество цифр вводимого неотрицательного положительного числа

231
431
Посмотреть ответы 2

Ответы на вопрос:

bayawb65
4,7(57 оценок)

Var   a, c : integer; begin   readln (a);   c : = 0;   if (a = 0) then c : = 1   else     while a < > 0 do     begin       c : = c + 1;       a : = a div 10;       end;   writeln (c); end.

исходные данные

алгоритм

результат

Популярно: Информатика