Цикл repeat часто называют циклом с постусловием, или циклом
«ДО», так как он прекращает выполняться, как только
значение выражения условия, записанного после слова until, равно True.
Оператор повтора repeat состоит из заголовка repeat, тела и условия
окончания until.
Формат записи:
Repeat
<оператор;>
…
<оператор>
until <условие окончания цикла>;
Посчитать S=1+2+3+4+5
Program Hl;
Var
I: integer;
Begin
I:=1; s:=0;
Repeat
S:=s+1;
I:=I+1;
Until I>5;
End;
