Составьте программу, по которой вычисляется f=10! (факториалом числа n называется произведение всех натуральных чисел от i до n включительно).

Var n,f,i:integer;
begin
n:=10;
f:=1;
for i:=1 to n do f:=f*i;
writeln(n,'! = ',f);
end.

Результат:
10! = 3628800

#include <iostream>      |
using namespace std;   |
int main(){                      | 
int f=1, i;                        |                     C++
for (i=0;i<10;++i) f*=i;    | 
cout<<f<<endl;              |
return 0;                        |
}                                    |