Информатика. Программирование в Delphi
352
Циклы
Инструкция for
Вариант 1 (с увеличением счетчика цикла).
for Счетчик := Начальное Значение to Конечное Значение do
begin
{инструкции}
end;
Инструкции между
begin
и
end
выполняются (
Конечное Значение
Начальное Значение
) + 1 раз.
Если
Начальное Значение > Конечное Значение
, то инструкции меж-
ду
begin
и
end
не выполняются.
Если между
begin
и
end
находится только одна инструкция, то слова
begin
и
end
можно не писать.
Вариант 2 (с уменьшением счетчика цикла).
for Счетчик := Начальное Значение downto Конечное Значение do
begin
{инструкции }
end;
Инструкции между
begin
и
end
выполняются (
Начальное Значение –
Конечное Значение
) + 1 раз.
Если
Начальное Значение < Конечное Значение
, то инструкции между
begin
и
end
не выполняются.
Если между
begin
и
end
находится только одна инструкция, то слова
begin
и
end
можно не писать.
Инструкция repeat
repeat
begin
{инструкции}
end
until Условие;
Сначала выполняются инструкции цикла, которые расположены между
begin
и
end.
Затем проверяется значение выражения
Условие
, и если оно равно
False
, то инструкции цикла выполняются еще раз. И так до тех пор, пока
Усло-
вие
не станет истинным.
Если между
begin
и
end
находится только одна инструкция, то слова
I...,342,343,344,345,346,347,348,349,350,351 353,354,355,356,357,358,359,360,361,362,...370