记录编号	33487	评测结果	AAAAAAAAAA
题目名称	616.整理牙刷	最终得分	100
用户昵称	Launcher	是否通过	通过
代码语言	Pascal	运行时间	0.004 s
提交时间	2011-11-10 19:46:09	内存使用	0.50 MiB

program put;
var
 f:array[1..100000]of longint;

 i,j,k,m,n,max:longint;
begin
 assign(input,'put.in');reset(input);assign(output,'put.out');rewrite(output);
 read(n);
 if (n=0)or(n=1) then begin writeln('No Solution!'); exit; end;
 f[1]:=0;
 f[2]:=1;

 for i:=3 to n do
  f[i]:=(i-1)*(f[i-1]+f[i-2]) mod 1206;
 writeln(f[n]);
 close(input);close(output);
end.