program ideone;

var
  I: Integer;
begin
  For I := 0 To 10 Do
    writeln(I);
end.