记录编号	22435	评测结果	AAAAAAAAAA
题目名称	01进制数	最终得分	100
用户昵称	ybh	是否通过	通过
代码语言	Pascal	运行时间	0.215 s
提交时间	2010-11-19 11:36:58	内存使用	3.92 MiB

{Binacy NOIP模拟2010-11-19
 Author: yangbohua
 Time: 2010-11-19}

program binacy;
var
  f:array[0..1000000] of longint;
  n,i:longint;
begin
  assign(input,'binacy.in');
  reset(input);
  assign(output,'binacy.out');
  rewrite(output);
  readln(n);
  f[1]:=1;
  f[2]:=2;
  for i:=3 to n do
    f[i]:=(f[i-1]+f[i-2]) mod 15746;
  writeln(f[n]);
  close(input);
  close(output);
end.