program IntegerSequence;

{$APPTYPE CONSOLE}

var
  i: Integer;
begin
  for i := 1 to High(i) do
    WriteLn(i);
end.