let var x : int := 1 in for y := 2 to 5 do (x := x * y; when x > 16 do break); x end