Predmet:Repeat petlja
Ova vrsta petlje koristi se u zadacima u kojima broj ponavljanja ovisi o nekom uvjetu. Uvjet se ispituje na kraju petlje (nakon izvođenja niza naredbi) tako da se naredbe u petlji izvode barem jednom. Petlja se prekida u momentu kad se ispuni uvjet, odnosno, ponavlja se sve dok je uvjet neistinit.
Opći oblik naredbe je:
repeat
naredba;
naredba;
...
until uvjet
Primjer:
Ispis prirodnih brojeva djeljivih sa 5 od 1 do n.
PreuzmiIzvorni kôd (Delphi):PROGRAM PROGRAM11;
USES
WinCrt;
VAR
i, n: Integer;
BEGIN
Writeln('Djeljivi sa 5 od 1 do n');
Write('Do broj ');
Readln(n);
i := 1;
REPEAT
IF i MOD 5 = 0 THEN
Writeln(i);
i := i + 1;
UNTIL i > n;
END.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.