var n,a,b,c,i:longint;
begin
read(n);
a:=0;b:=1;i:=1;
while i<n do
begin
c:=a+b;
a:=b;
b:=c;
inc(i);
end;
writeln(c);
end.
输入：9

输出：34