Задача в Паскале.

Вычислить произведение чисел от 5 до 15 и определить получится ли результат 9-ти значным числом. (Первоначальное значение Р=1, начальное значение параметра цикла 5, конечное 15). Использовать формулу для подсчёта произведения. После цикла проверить условие, что получится. Результат больше = 100 млн. и меньше = 999

Question

Информатика

Офелия

5 марта, 09:27

Задача в Паскале.

Вычислить произведение чисел от 5 до 15 и определить получится ли результат 9-ти значным числом. (Первоначальное значение Р=1, начальное значение параметра цикла 5, конечное 15). Использовать формулу для подсчёта произведения. После цикла проверить условие, что получится. Результат больше = 100 млн. и меньше = 999

+4

Ответы (1)

Знаешь ответ?

Борис · Answer 1

Var

i: integer;

p: int64; {В 4-байтовый integer не влезет}

begin

p : = 1;

for i : = 5 to 15 do p : = p * i;

writeln (p);

end.

Результат:

54486432000