Ответы 2

  • //PascalABC.NET 3.1 сборка 1239begin    PrintLN(Range(1, 25, 2).Aggregate(1.0, (s, x)-> s * x));end.Ответ7905853580625
  • //Pascal ABC.NET v3.1 сборка 1219Var i,a:int64;begin a:=1;for i:=1 to 25 do a:=a*i;writeln(a);end.
    • Автор:

      nixon
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years