let in for x := 0 to 16 do for y := 1 to 2 do (break; (x+y*x)); 1 end