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

Question

Информатика

Аля

14 ноября, 15:47

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

+1

Ответы (1)

Знаете ответ на вопрос?

Олимпий · Answer 1

Var

n: integer;

s: string;

begin

Randomize;

n : = Random (900) + 1;

Str (n, s) ;

writeln ('Количество цифр в числе ', n, ' равно ', length (s))

end.

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

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