#include <bits/stdc++.h>
using namespace std;
long long n,i,s=1;
int main()
{
cin>>n;
for (int i=1; i<=n; i++)
s=s*i;
cout<<s;
}
clrscr;Mình có cách siêu rút gọn của pascal đây:
uses crt;
var n,t: extended;
i: longint;
begin
repeat
write('n=');read(n);
until n>0;
t:=1;
for i:=1 to n div 2 do
t:=t*n*(n-i+1);
if n mod 2 = 1 then
t:=t*(n div 2 +1);
write('n!=t');
readln;readln;
end.