{$X-}

var
  i: Integer;
  
begin
  for i := 0 to 10 do
    Writeln(i);
end.