Implementarea algoritmilor ciclici, adică algoritmii care conțin operații repetate repetate repetate, se folosesc operatori de ciclu special. În Pascal există trei tipuri de cicluri: FOR, WHILE și REPEAT. Instrumentul FOR este scris ca:
FOR variabilă: = valoarea inițială până la valoarea finală DO
FOR variabilă: = valoarea inițială DOWNTO valoarea finală DO
Aici, variabila - orice tip ordinal variabilă, numit în acest context, că variabila buclă, valoarea inițială și valoarea finală - expresia de același tip (cu excepția, făcută ca întotdeauna pentru diferite tipuri de variabile întregi). FOR bucla se execută după cum urmează: variabila buclă se atribuie o valoare inițială, iar apoi corpul buclei (operatorul sau unitatea care vine după DO). Aceste două acțiuni reprezintă împreună o etapă a ciclului. Apoi variabila buclă este atribuit următorul ciclu (FOR. TO) sau ciclul anterior (FOR. Downto) valoarea (funcția rechemare Succ și Pred) se realizează și următorul pas al ciclului. Acest lucru se întâmplă, atâta timp cât valoarea variabilei buclei este mai mare decât (FOR. TO) sau mai puțin (FOR. Downto) valoarea finală. O buclă FOR poate să nu se execute o dată dacă valoarea inițială este mai mare decât valoarea finală din buclă FOR. TO sau mai puțin decât sfârșitul în buclă FOR. Downto. Să scriem două exemple de utilizare a buclă FOR. calculează suma pătratelor cu numere naturale de la 1 la N.
CONST s. Real = 0; N = 22;
ÎNCEPUT PENTRU i: = 1 TO N DO s: = s + SQR (i); WRITELN ('sum =', s); END.
și afișați simboluri cu numere de la 32 la 255
ÎNCEPUT PENTRU c: = '' la # 255 scrieți (c); writeln; END.
Al doilea tip de ciclu - buclă WHILE - este scris ca:
Cu toate că expresia logică DO declarație / bloc
Aici expresia logică este orice expresie de tip boolean. Ciclul se efectuează după cum urmează. expresia logică este evaluată și, dacă este adevărat, corpul buclei este executat, altfel buclele se termină. Este evident că o buclă în timp poate sau nu poate fi executată nici măcar o dată, și a efectuat nenumărate ori (în acest ultim caz se spune că programul este o buclă). Vom scrie cele două sarcini anterioare utilizând buclă WHILE:
CONST i. Cuvânt = 1; s. Real = 0; N = 22;
ÎNCEPUT CÂND<=N DO BEGIN s:=s+SQR(i); INC(i); END;