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

OlegBasov OlegBasov    3   30.07.2019 09:10    0

Ответы
pidgenatar pidgenatar  27.09.2020 21:11
//PascalABC.NET 3.1 сборка 1239
begin
    PrintLN(Range(1, 25, 2).Aggregate(1.0, (s, x)-> s * x));
end.

ответ
7905853580625
ПОКАЗАТЬ ОТВЕТЫ
ойооы ойооы  27.09.2020 21:11
//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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика