program faktorialis;
var n:longint;
function f(x:longint):longint;
begin
     if x=0 then f:=1 else f:=f(x-1)*x
end;
begin
     readln(n);
     writeln(f(n));
     readln
end.