program TEST;
var
  i : integer;
   
begin
   repeat
      i := i + 1;
      writeln(i);
   until i > 20;
end.