Вопрос по информатике:
Вычислить 20!+ 30! используя паскаль. желательно показывая формулу. ато подзабыл тему
- 26.08.2018 17:14
- Информатика
- remove_red_eye 10323
- thumb_up 45
Ответы и объяснения 1
// 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
- 27.08.2018 06:45
- thumb_up 24
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.