Предмет: Информатика, автор: safon86

Датчиком случайных чисел сгенерируйте случайное натуральное число в интервале от1 до 900. Определите, сколько цифр в полученном числе.

Ответы

Автор ответа: Аноним
0
var
  n: integer;
  s: string;

begin
  Randomize;
  n := Random(900) + 1;
  Str(n, s);
  writeln('Количество цифр в числе ', n, ' равно ', length(s))
end.

Тестовое решение:

Количество цифр в числе 598 равно 3


Похожие вопросы