program n1;
     var n,s:integer;
     function f(n:integer):integer;
  begin
   if n=0 then f:=1
    else f:=n*f(n-1)
  end;
  begin
   write('n=');
   readln(n);
   writeln('n!=',f(n));
   readln
  end.