Составить программу в pascal: найдите произведение - вопрос №359172158158 от Вандализм 27.03.2020 07:09

Question

Информатика: Составить программу в pascal: найдите произведение чисел 58 до 158 с шагом 1.

Вандализм · Answer

Alviko прав, однако мы тут не благородные влюблённые, чтобы, в случае отказа, не надоедать, посему попытаться стоит, пусть и с PascalABC.NET:

var
a: System.Numerics.BigInteger := new System.Numerics.BigInteger(1);
i: integer;

begin
for i := 58 to 158 do
a := a * i;
writeln(a);
end.