Укажите 3 способа задания цикла. Приведите примеры

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