for i:= 1 to 10 do
    (break; i)