while (b < 10) do begin if (b=5) then leave; b = b + 1; if (b=2) then leave ohne2 suspend; ohne2: end .. weiter