C :

#include <stdio.h>

int main(void) {
	int i, n, s = 1;
	do
		scanf("%d", &n);
	while(!(n >= 0 && n <= 10));
	for(i = 1; i <= n; i ++)
		s = s * i;
	printf("%d", s);
	return 0;
}

C++ :

#include<cstdio>
using namespace std;
int main()
{
	int i,n,s=1;
	scanf("%d",&n);
	for(i=1;i<=n;i++)
	{
		s=s*i;
	}
	printf("%d",s);
	return 0;
}

Pascal :

var i,s,n:longint;
begin
  readln(n);
  s:=1;
  for i:=1 to n do
    s:=s*i
;
  writeln(s);
end.