Вычислить произведение целых чисел от 1 до 100.Напишите программу.

2

Ответы и объяснения

2014-01-24T15:50:03+00:00
Сделал до 30 больше терпения не хватило.
результат:2,652528598121911е+32
Комментарий удален
ааа
тогда 1*2*3*4*5*6*7*8*9*10*11*12*13*14 и так до 100
2014-01-24T15:51:22+00:00
Program v1;
Var proiz,x :integer;
Begin
X:=1;
While x<=100 do begin
X:=x+1;
proiz:=proiz*x;
End;
Writeln(proiz);
End.

PASCAL