Данный оператор используется, когда неизвестно число повторений, условие, управляющее циклом формируется на окончание цикла, данный вид цикла выполняется хотя бы один раз.
Описывается следующим образом:
Repeat
<тело цикла>;
<изменение параметров цикла>
until <логическое выражение>;
Выполняется следующим образом:
1. Выполняется тело цикла.
2. Обязательно есть величина, которая, изменяясь, влияет на логическое выражение.
3. Если результат после until равен false, то действия выполняются снова. Если результат равен true, выполняются действия далее по программе.
Пример программы:
Program ma;
Const
EPS=1E-10;
var
n: byte;
t, x, F, s: real;
begin
writeln (‘Ввод x’);
readln (x);
n:=1;
t:=x;
s:=0;
repeat
s:=s+t;
n:=n+t;
F:=SQR (x)/((2*n-2)*(2*n-1));
Until
ABS (t)<=EPS;
Writeln (t, s);
End.
