Вычислить 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
Не нашли ответ?
Похожие вопросы