Нахождение произведения целых чисел из [-8: 14] - вопрос №5115218814 от alistas 23.03.2020 13:38

Question

Информатика: Нахождение произведения целых чисел из [-8: 14] ,

alistas · Answer

Диапазон -8..14 содержит в себе нуль, т.е. самый простой вариант ответа: Произведение этих чисел равно нулю.

Но если не рассматривать нуль в качестве множителя, то ответ: 3515028701184000

Var p : BigInteger;
i : Integer;
Begin
p:=1;
For i:=-8 to 14 do If i<>0 then p:=p*i;
Writeln(p);
end.