Dodał admin, 2007-08-05 Autor / Opracowanie: Marcin D.

Pętla jest to instrukcja lub zestaw instrukcji do wykonania przez program pod określonym warunkiem. Jak sama nazwa wskazuje powtarza pewną czynność określoną ilość razy, działa dopóki... (Marcin D.)

A teraz wyjaśnienie. Na początku zdeklarowaliśmy zmienną o nazwie "licznik".
Zaraz po "BEGIN" czyścimy cały ekran i zerujemy licznik (przypisujemy wartość 0). Zaczynamy pętle. Od tego momentu, zatem, wszystko będzie powtarzane. Licznik przyjmuje wartość "licznik+1". Licznik miał wartość 0, zatem 0+1 jest jeden. Licznik, więc ma wartość 1. Program rozkazuje napisać tekst i wstawić wartość licznika. Pętla się kończy, program sprawdza czy warunek jest spełniony. Aby pętla się zakończyła, wartość licznika musi wynosić 100. Nasz licznik aktualnie ma wartość 1. Zatem warunek nie został spełniony - program wraca do słowa "REPEAT".
I znowu - licznik zwiększa swoją wartość o 1, czyli ma już 2. Rozkazuje napisać tekst i wstawić licznik. Sprawdza warunek - warunek nie jest spełniony - i znowu "REPEAT" Licznik podnosi swoją wartość do 3 i tak dalej. Pętla się zakończy gdy wartość licznika będzie równa 100. Gdy pętla się zakończy, program wykonuje dalsze instrukcje (w tym wypadku jest to "READLN"), po czym zakańcza pracę.

2. Pętla For to Do
Budowa pętli FOR to DO:
"FOR zmienna:=wartość początkowa TO wartość końcowa DO instrukcja" – (dla);
Pierwsze słowo "FOR" to słowo kluczowe sygnalizujące, że w tym miejscu będzie pętla. Po nim następuje od razu inicjacja zmiennej sterującej pętlą "for".
Każda pętla for ma swoją zmienną sterującą, czyli licznik wykonywanych pętli. Przedtem taką zmienną trzeba zadeklarować, musi to być zmienną całkowita.
Pętla "for" ma to do siebie, że w każdym cyklu jej wykonania zmienna sterująca zostaje automatycznie zwiększona o 1. Po wartości początkowej pętli stawiamy słowo kluczowe "TO" a po nim liczbę będącą ogranicznikiem pętli, czyli wartość końcową. Po ograniczniku stawiamy słowo kluczowe "DO" (ang. wykonuj) i następnie jedną instrukcję, która będzie wykonywana w pętli. Oczywiście może być ich parę połączonych w jednym bloku (instrukcja złożona) stosując po słowie "DO" BEGIN i END koniecznie ze średnikiem na końcu instrukcji. Możemy użyć pętli także do odliczania w dół przez wpisanie słowa DOWNTO zamiast TO, wtedy program będzie liczył „od końca”, a wartość początkowa będzie większa od końcowej, odwrotnie niż w przypadku odliczania „od początku”.

program petla1;
uses crt;
var a:byte;
begin
for a:=1 to 10 do
begin
write('PETLA');
end;
end.