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

0 голосов
215 просмотров

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


задал Начинающий (134 баллов) по предмету Информатика
1 Ответ
0 голосов
 
Лучший ответ

Var 
  n, cnt: integer;
begin
  write('Введите число: ');
  read(n);
  repeat
    inc(cnt);
    n := n div 10;
  until n = 0;
  writeln('Количество цифр в числе: ', cnt);
end.

решение Бакалавр (13.3 тыс. баллов)
...