Использование циклов в Object Pascal. Семенов Н.М. - 11 стр.

UptoLike

Составители: 

11
Рис.2. Программа просмотра файлов с добавленной операцией Save As.
4. Щёлкните на кнопке ОК. Загруженный в программу файл будет записан под
новым именем. Вы можете проверить это, загрузив в программу только что записанный
файл. Он должен быть идентичен исходному файлу.
5. В меню File выберите Exit для выхода из программы.
3 Создание более сложных циклических конструкций
В Object Pascal можно создавать циклы произвольной сложности и с
характеристиками, не поддерживаемыми непосредственно стандартными
конструкциями циклов while - do, repeat - until, for - to - do, for - downto - do.
Трёх стандартных конструкций циклов оказывается достаточно в подавляющем
большинстве случаев. Поэтому не используйте без нужды способ создания более
сложных циклов, описанный в этом разделе.
3.1 Настраиваемые циклы
Обычно условие цикла проверяется или в начале (циклы while и for) или в конце
(цикл repeat) исполняемого блока. Однако есть возможность сконструировать цикл,
условие которого будет проверяться в произвольном месте тела цикла.
Если условие проверяется где - то в середине цикла, то часть тела цикла,
стоящая до места проверки, гарантированно выполняется по меньшей мере один раз, а
часть, стоящая после проверки, может не выполняться ни разу.
В Object Pascal можно сконструировать настраиваемый цикл, создав сначала
цикл с бесконечным числом итераций, а затем использовав встроенную процедуру
Break для выхода из цикла в нужный момент. Этот метод не создаёт настоящий
бесконечный цикл. Вашей задачей по - прежнему остаётся обеспечить завершение
работы цикла. Этот метод только передаёт полномочия по проверке условия цикла и
обеспечению выхода из него Вам, программисту.
3.2 Создание бесконечных циклов