Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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.