Цикл for(выражение 1; выражение 2; выражение 3 ) принимает три аргумента:
1. Выражение 1 — объявление (и) или инициализация, ранее объявленной, переменной-счетчика, которая будет отвечать за истинность условия в цикле for
2. Выражение 2 — это условие продолжения цикла for, оно проверяется на истинность.
3. Выражение 3 изменяет значение переменной-счетчика, без выражения 3 цикл считается бесконечным
++ это операция инкремента, увеличение значения переменной на единицу;
-- это операция декремента, уменьшение значения переменной на единицу.
Тело цикла обрамляется фигурными скобочками, если тело цикла состоит из одного оператора ,то фигурные скобочки не нужны. В теле цикла расположен код, который будет выполняться на каждой итерации(шаге цикла)
Циклы могут содержать другие циклы(вложенные циклы), при этом сначала выполняются все итерации вложенного(вложенных) цикла(циклов), а затем происходит итерация родительского цикла(то есть того, в который вложены другие циклы).
uses Drawman;
begin
field(20,17);
PenUp;
ToPoint(0,0);
PenDown;
ToPoint(20,0);
ToPoint(20,10);
ToPoint(19,10);
ToPoint(19,1);
ToPoint(1,1);
ToPoint(1,16);
ToPoint(19,16);
ToPoint(19,13);
ToPoint(20,13);
PenUp;
ToPoint(1,3);
PenDown;
ToPoint(7,3); ToPoint(7,1);
ToPoint(9,1);
ToPoint(9,4);
ToPoint(17,4);
ToPoint(17,1);
ToPoint(17,9);
ToPoint(19,9);
PenUp; ToPoint(19,13); PenDown;
ToPoint(14,13);
ToPoint(14,16);
ToPoint(14,14);
ToPoint(9,14);
ToPoint(9,16);
ToPoint(9,13);
ToPoint(4,13);
ToPoint(4,16);
end.
