Pascal uzdevumu piemēri

Cikla operators (REPEAT...UNTIL)
Līdzīgi WHILE, darbojas konstrukcija REPEAT un UNTIL gadījumā, atšķirībā no cikliskā operatora WHILE...DO..., sākumā tiek izpildīta cikliskā darbība, pēc kuras dators pārbauda nosacījumu.
Otra atšķirība saistīta ar to, ka nosacījuma izpilde noved pie bloka atkārtošanas nobeiguma.
Piemēri:

REPEAT UNTIL x=0;
REPEAT UNTIL (z<>1) AND (q>7);
REPEAT UNTIL w= FALSE;
REPEAT UNTIL g ='I';
Vienkāršo bloku gadījumā tiek izmantota šāda tipa forma:
REPEAT READ (K,Q[K]) UNTIL K=20;
Ja bloks sastāv no daudziem operatoriem, tad parasti izmanto citu formu:

REPEAT
WRITE ('Ievadi R');
READ (R);
C:=2*3.14*R
WRITELN (C);
UNTIL R<0;

Šajā piemērā tiek cikliski pieprasīta R vērtības ievadīšana No tastatūras, un tiek paziņots atbilsto šā riņķa garums. Pie pirmā R<0 cikls tiks pārtraukts. Kā redzams minētajā piemērā, REPEAT norāda uz cikla sākumu, bet UNTIL uz cikla beigām, tāpēc BEGIN un END nelieto.
…