Существуют три вида циклов на языке Pascal:

1) цикл с параметром (с известным числом повторений) for; используется, когда известно, сколько раз выполнится цикл;

2) цикл с предусловием while; используется, когда неизвестно число выполнений цикла и цикл выполняется, пока условие верно;

3) цикл с постусловием repeat; используется, когда неизвестно число выполнений цикла и цикл выполняется до истинности условия.

Примеры.

1) найти сумму первых 10 натуральных чисел:

     s:=0;

     for i:=1 to 10 do s:=s+i;

     write(s);

2) найти сумму всех натуральных четных чисел в промежутке от 7 до 45:

     s:=0; i:=8;

      while i<45 do

        begin

           s:=s+i; 

           i:=i+2

        end;

     write(s);

3) найти сумму всех натуральных четных чисел в промежутке от 7 до 45:

     s:=0; i:=8;

      repeat

           s:=s+i; 

           i:=i+2

        until  i>45;

     write(s);