记录编号	99341	评测结果	AAAAAAAAAAAAAAAAAAAA
题目名称	棋盘上的車	最终得分	100
用户昵称	FoolMike	是否通过	通过
代码语言	Pascal	运行时间	0.007 s
提交时间	2014-04-27 00:04:01	内存使用	0.17 MiB

var
n:longint;
a:int64;
begin
assign(input,'rook.in');assign(output,'rook.out');
reset(input);rewrite(output);a:=1;
read(n);for n:=1 to n do a:=a*n;
writeln(a);close(input);close(output);end.