...
Například starý COBOL, ten neměl ani příkaz WHILE, FOR s přilepeným tělem cyklu, ale příkaz PERFORM s odděleným tělem cyklu. viz zde https://www.tutorialspoint.com/cobol/cobol_loop_statements.htm
...
COBOL ma na vsetky typy cyklov PERFORM. Nema sice klucove slovo WHILE ale ma UNTIL (Pascal ma obe). Ak je test podmienky na zaciatku cyklu pouzije sa WITH TEST BEFORE, alebo ak je na konci tak WITH TEST AFTER. Telo cyklu netreba deklarovat oddelene, je to ako v inych jazykoch - t.j. takto:
napr. cyklus s testom na zaciatku, t.j.
while (!condition) {
loop_body
}
sa pise ako:
perform with test before until condition
loop_body
end-perform
cyklus s testom na konci, t.j.
{
loop_body
} while (!condition)
je:
perform with test after until condition
loop_body
end-perform
a
for (j=0; j<n; j++) {
loop_body
}
sa zapise takto
perform varying j from 0 by 1 until j >= n
loop_body
end-perform