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

Question

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

Answer 1

Сделал до 30 больше терпения не хватило.
результат:2,652528598121911е+32

Comments

ааа

---

тогда 1*2*3*4*5*6*7*8*9*10*11*12*13*14 и так до 100

Answer 2

Program v1;
Var proiz,x :integer;
Begin
X:=1;
While x<=100 do begin<br>X:=x+1;
proiz:=proiz*x;
End;
Writeln(proiz);
End.

PASCAL