Существуют три вида циклов на языке 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</p>
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);