Visual Basic .NET <-> Free Pascal | Loop with condition at the end until is false

Visual Basic .NET

do loop until

Description

do
statements
loop until condition
Used keywords: do until loop

Input

Note: Here usable statements:
break statement continue statement

Examples

Visual Basic .NET

i=10
do
 i=i-1
 loop until ( i = 0)
do
  i=i+1
  if i=3 then
    exit do
end if
loop until (i=10)
.
Free Pascal

repeat until

Description

repeat statements until condition;
Used keywords: repeat until

Input

Note: Here usable statements:
break statement continue statement

Examples

Free Pascal

i:=10;
repeat dec(i) until ( i = 0);
repeat
  inc(i);
  if i=3 then
    break;
until (i=10);
Loop with condition at the end until is false in another programming language:
Differences to:
Languages: en hu cz sk