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

bill3334 bill3334    2   30.05.2019 19:50    1

Ответы
nacny2016 nacny2016  30.06.2020 23:05
Сделал до 30 больше терпения не хватило.
результат:2,652528598121911е+32
ПОКАЗАТЬ ОТВЕТЫ
KattyDark010203 KattyDark010203  30.06.2020 23:05
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика