program faktorial;
uses wincrt;
var
i,a,n,f:integer;
begin
readln(n);
f:=1; i:=0;
if (n>1)then
begin
repeat
i:=i+1;
f:=f*i;
until i=n;
a:=n;
for i:=n downto 2 do
begin
write (a,'x');
a:=a-1;
end;
write(1,'=',f)
end
else
if (n=0)then writeln ('1') else
if (n=1)then writeln ('1') else
writeln ('tidak terdifinisi')
end.