while true



while_true
Smart pascal source code
var i: Integer; repeat while True do begin Inc(i); if i = 2 then continue; WriteLn(i); if i = 3 then Break; end; until True; i := 0; while True do begin repeat Inc(i); if i = 2 then continue; WriteLn(i); if i = 3 then Break; until False; Break; end; {<<< RESULT - CONSOLE LOG >>> ----------------------------- 1 3 1 3 ----------------------------- {<<<<<<<<< THE END >>>>>>>>>}