паскаль абс вычислить :1*3*5*...*23*25

Паскаль abs вычислить :1*3*5*...*23*25

Задать свой вопрос
2 ответа
//PascalABC.NET 3.1 сборка 1239
begin
    PrintLN(Range(1, 25, 2).Aggregate(1.0, (s, x)-gt; s * x));
end.

Ответ
7905853580625


//Pascal ABC.NET v3.1 сборка 1219

Var
 i,a:int64;
begin
 a:=1;
for i:=1 to 25 do
 a:=a*i;
writeln(a);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт