program pr3; {$APPTYPE CONSOLE} uses math; var i,n:integer; a:array[1..1000] of int64; begin readln (n); a[1]:=1; a[2]:=1; for i:=3 to n do a[i]:=a[i-1]+a[i-2]; for i:=1 to n do writeln(a[i]); readln; { TODO -oUser -cConsole Main : Insert code here } end.