Free Pascal <-> FreeBASIC | Cyklus s podmienkou na konci kym podmienka je nepravda

Free Pascal

repeat until

Popis

repeat statements until condition;
Použitá kľúčové slová: repeat until

Vstup

Poznámka: Tu použiteľné príkazy:
Príkaz prerušenie príkaz pokračovanie

Príklady

Free Pascal

i:=10;
repeat dec(i) until ( i = 0);
repeat
  inc(i);
  if i=3 then
    break;
until (i=10);
.
FreeBASIC

do loop until

Popis

do
statements
loop until condition
Použitá kľúčové slová: do until loop

Vstup

Poznámka: Tu použiteľné príkazy:
Príkaz prerušenie príkaz pokračovanie

Príklady

FreeBASIC

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)
Cyklus s podmienkou na konci kym podmienka je nepravda v inom programovacom jazyku:
Rozdiely oproti:
V iných jazykoch: en hu cz sk