Задача. Построить орнамент, состоящий из квадратов, расположенных по краю поля. Исходное положение ГРИС - в верхнем левом углу, направление на юг.
Процедуру, рисующую цепочку квадратов от края до края поля, назовём РЯД. Процедуру, рисующую один квадрат, назовём КВАДРАТ. Снача пишем основную программу:
Код
программа Орнамент
нач
сделай РЯД
поворот
сделай РЯД
поворот
сделай РЯД
поворот
сделай РЯД
кон
Результат программы:
Теперь напишем процедуры РЯД и КВАДРАТ:
Код
процедура РЯД
нач
прыжок
прыжок
пока впереди не край, повторять
нц
сделай КВАДРАТ
если впереди не край
то прыжок
кв
кц
кон
Код
процедура КВАДРАТ
нач
шаг
поворот
шаг
поворот
шаг
поворот
шаг
поворот
прыжок
кон
В процедуре РЯД в теле цикла содержится неполное ветвление. Структуру такого алгоритма можно назвать так: цикл с вложенным ветвлением.