Visual C++ .NET <-> Free Pascal | Következő iteráció elindítása

i=0;
while (i<10) ++i;
x =0;
while (i<20)
{
 i= i+2;
 if (i==16)
 {
    continue;
 }
 x++; 
}

i:=0;
while i<10 do inc(i);
x :=0;
while i<20 do
begin
 i:= i+2;
 if i=16 then
 begin
    continue
 end;
 inc(x); 
end;