2.20 Операторы прерывания

В Pascal имеется четыре оператора, позволяющие прервать выполнение текущего блока: continue, break, exit, halt(X). Первый из них позволяет прервать выполнение тела цикла и перейти к следующей итерации, второй – немедленно закончить выполнение цикла, третий – немедленно выйти из текущего блока (если текущим блоком является основная программа, то закончить выполнение программы), четвертый – немедленно выйти из программы, при этом в качестве параметра задается целое значение кода выхода, которое может быть проанализировано внешней программой, запустившей данную.

procedure TForm1.Button1Click(Sender: TObject); var

i,j : integer; x,Sum,F,S,R,E : real;

begin

x := StrToFloat(XEdit.Text);

E := StrToFloat(EEdit.Text); i := 1;

Sum := 0; repeat

F := 1;