For21. Дано целое число N (> 0). Используя один цикл, найти сумму 1 + 1/(1!) + 1/(2!) + 1/(3!) +…+ 1/(N!) (выражение N! — N-факториал — обозначает произведение всех целых чисел от 1 до N: N! = 1*2*…*N). Полученное число является приближенным значением константы e = exp(1).
>Решение Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | program For21; var Rez,factorial:Real; N, i :Integer; begin Write('Введите N: '); Readln(N); Rez:=1; factorial:=1; For i:=1 to N do begin factorial:=factorial*i; Rez:=Rez+1/factorial; end; Writeln(Rez); end. |
>
Решение C
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | #include int main(void) { int n; printf("N:"); scanf ("%i", &n); float n1=1,rez=1; int i; for (i =1; i<=n; ++i){ n1 *=(float)i; rez += 1/n1; } printf("%f \n ",rez); return 0; } |
Решение C++
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | #include <iostream> using namespace std; int main() { setlocale(LC_ALL, "Russian"); int n; cout<<"N:"; cin>>n; float n1 = 1, rez = 1; int i; for (i = 1; i <= n; ++i) { n1 *= (float)i; rez += 1 / n1; } cout<< rez; } |
int n;
decimal x = 1,y =1;
n = int.Parse(Console.ReadLine());
for (int i = 1; i <= n; i++)
{
x *=i;
y += 1 / x;
}
Console.WriteLine(y);
#python
n=4
r=1
b=0
c=0
for i in range(1, n+1):
r=r*i
c=1/r
b=b+c
print(b)