Програмиа паскаль.Написать программу которая будет считать факториал,а затем сумму факториалов (все в одной программе).Желательно как можно проще составить.
Ответы
Ответ дал:
1
//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
begin
var s:BigInteger;
for var i:=1 to ReadInteger('Введите количество слагаемых->') do
s+=Range(1,ReadInteger('n!=')).Aggregate((r,n)->r*n).Println;
Println('Сумма=',s);
end.
Пример:
Введите количество слагаемых-> 3
n!= 4
24
n!= 3
6
n!= 5
120
Сумма= 150
//Версия 3.3, сборка 1634 (14.02.2018)
begin
var s:BigInteger;
for var i:=1 to ReadInteger('Введите количество слагаемых->') do
s+=Range(1,ReadInteger('n!=')).Aggregate((r,n)->r*n).Println;
Println('Сумма=',s);
end.
Пример:
Введите количество слагаемых-> 3
n!= 4
24
n!= 3
6
n!= 5
120
Сумма= 150
Вас заинтересует
1 год назад
2 года назад
2 года назад
3 года назад
3 года назад
9 лет назад