Вычислить 20!+ 30! используя паскаль. желательно показывая формулу. ато подзабыл тему

Вычислить 20!+ 30! используя паскаль. желательно показывая формулу. ато подзабыл тему
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016 function F(n:biginteger):biginteger; begin   if n<=1 then Result:=1   else begin     Result:=1;     var i:biginteger:=1;     while i<=n do begin Result*=i; i+=1 end;     end end; begin   Writeln(F(20)+F(30)) end. Результат 265252859812193491538316656640000
Не нашли ответ?
Ответить на вопрос
Похожие вопросы