Ответы
Ответ дал:
0
//PascalABC.NET 3.1 сборка 1239
begin
PrintLN(Range(1, 25, 2).Aggregate(1.0, (s, x)-> s * x));
end.
Ответ
7905853580625
begin
PrintLN(Range(1, 25, 2).Aggregate(1.0, (s, x)-> s * x));
end.
Ответ
7905853580625
Ответ дал:
0
//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.
Var
i,a:int64;
begin
a:=1;
for i:=1 to 25 do
a:=a*i;
writeln(a);
end.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
8 лет назад
9 лет назад
9 лет назад