Датчиком случайных чисел сгенерируйте случайное натуральное число в интервале от1 до 900. Определите, сколько цифр в полученном числе.
Датчиком случайных чисел сгенерируйте случайное натуральное число в интервале от1 до 900. Определите, сколько цифр в полученном числе.
Гость
Ответ(ы) на вопрос:
Гостьvar
n: integer;
s: string;
begin
Randomize;
n := Random(900) + 1;
Str(n, s);
writeln('Количество цифр в числе ', n, ' равно ', length(s))
end.
Тестовое решение:
Количество цифр в числе 598 равно 3
Не нашли ответ?
Похожие вопросы