Иллюстрированный самоучитель по Basic, вводный курс

Циклический алгоритм. Оператор с заранее известным числом повторений.

Следующая группа упражнений поможет вам закрепить работу с оператором цикла в графике на примере орнаментов. Сначала рассмотрим пример.

Орнамент – это повторяющийся геометрический узор, например, как на рис. 1.40.

Иллюстрированный самоучитель по Basic, вводный курс › Алгоритмы, графика, символы и строки › Циклический алгоритм. Оператор с заранее известным числом повторений.
Рис. 1.40. Орнамент

Правила построения орнаментов:

  • выявить в орнаменте повторяющийся фрагмент;
  • выделить опорную изменяющуюся величину (параметр), ее начальное, конечное и шаг;
  • дать параметру имя;
  • определить смещение других изменяющихся величин относительно опорной;
  • написать оператор цикла.

152. Напишите программу для рисования орнамента (рис. 1.40).

153. Закрепите успех, написав программу для построения греческого орнамента (рис. 1.41).

Иллюстрированный самоучитель по Basic, вводный курс › Алгоритмы, графика, символы и строки › Циклический алгоритм. Оператор с заранее известным числом повторений.
Рис. 1.41. Греческий орнамент

154. Когда мы изучали операторы data и read, то мы говорили, что используем их при изучении оператора цикла. Этот час пробил. Задав в операторе data координаты всех точек концов отрезков, из которых состоит рис. 1.42, напишите программу, рисующую Буратино при помощи оператора цикла.

Иллюстрированный самоучитель по Basic, вводный курс › Алгоритмы, графика, символы и строки › Циклический алгоритм. Оператор с заранее известным числом повторений.
Рис. 1.42. Буратино

Совет
При рисовании непрерывной ломаной линии применяется сокращенная форма оператора line, а именно: line -(х, Y), с. То есть линия будет рисоваться от последней графической точки на экране до точки с координатами X, у. Поэтому при выполнении предыдущего задания рекомендуется поставить первую точку оператором pset, а затем в цикле считывать поочередно координаты следующих точек и рисовать отрезки при помощи сокращенной формы оператора line
.

Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.