var i: Integer; for i:=1 to High(i) do PrintLn(i);