Visual C++ .NET <-> Free Pascal | Loop with condition on the beginning

Visual C++ .NET

while

while (condition) statement

Used keywords: while

Note: Here usable statements:
break statement continue statement

Loop with condition on the beginning the possible of use:

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

Free Pascal

while condition do statement;

Used keywords: do while

Note: Here usable statements:
break statement continue statement

Loop with condition on the beginning the possible of use:

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;

Loop with condition on the beginning in another programming language:

Differences to: