|
|
Алгоритм обработки
Exit
Оператор Exit используется, чтобы выйти из текущего блока программы. Если этот
блок — основная программа, то оператор Exit прерывает ее выполнение. Если
текущий блок вложенный, то оператор Exit передает управление во внешний блок на
оператор, следующий непосредственно за тем, которым было передано управление в
этот вложенный блок. Если текущий блок — процедура или функция (которые будут
рассмотрены позднее в этой главе разделе «Программы»), то выполнение вызванного
блока прерывается и управление передается на оператор, следующий за оператором
его вызова. Пример использования оператора Exit приведен в листинге 3.11.
Листинг 3.11. Использование оператора Exit
program ExitDemo;
uses Forms;
var
I: Char;
begin
Repeat
Write('Введите символ (для окончания введите Q) : ');
ReadLn(I);
If I = 'Q' then
Exit;
Until FALSE;
WriteLn ('Этот оператор никогда не выполняется'); end. { ExitDemo }
-и, --- Эта программа создает бесконечный цикл, завершающийся оператором Until
FALSE. Такой цикл никогда не завершится. Единственный способ для пользователя
завершить цикл — ввести Q. Тогда условие в структуре If ... Then станет истинным
и выполнится оператор Exit. Поскольку в данном случае блоком является main,
программа завершится.
в 3D MAX
|
