program shuzu(input,output);
{Faibonacci}
var
  x:array[1..20] of integer;
  i:integer;
begin
  x[1]:=0;x[2]:=1;
  writeln(x[1]);writeln(x[2]);
  for i:=3 to 20 do
    begin
      x[i]:=x[i-1]+x[i-2];
      writeln(x[i]);
    end;
end.