Задание 8. Рисование — 8. Используя конструкцию нц-раз-кц, команду сместиться в…

Чертёж на фото плохо различим, поэтому беру такую трактовку: а) квадраты с общим левым нижним углом и сторонами , , , …, ; б) прямоугольные треугольники с общим левым верхним прямым углом и катетами , , …, .

Идея: фигура — это повторение одной и той же процедуры с изменяющимся параметром. Процедура рисует одну фигуру размера n от опорной точки, цикл нц-раз-кц вызывает её для n = , , …, .

а) Квадраты

использовать Чертёжник
алг квадраты
нач
  цел k
  сместиться в точку(, )
  нц  раз
    k := k + 
    квадрат(k)
  кц
кон

алг квадрат(цел n)
нач
  опустить перо
  сместиться на вектор(n, )
  сместиться на вектор(, n)
  сместиться на вектор(-n, )
  сместиться на вектор(, -n)
  поднять перо
кон

Здесь k — переменная-счётчик, начальное значение k = (в КуМире числовые переменные сначала нужно обнулить: k := перед циклом). После каждого квадрата перо возвращается в точку (, ), поэтому у всех квадратов общий левый нижний угол.

Для порядка добавим перед циклом строку:

k := 

б) Треугольники

использовать Чертёжник
алг треугольники
нач
  цел k
  k := 
  сместиться в точку(, )
  нц  раз
    k := k + 
    треугольник(k)
  кц
кон

алг треугольник(цел n)
нач
  опустить перо
  сместиться на вектор(n, -n)
  сместиться на вектор(-n, )
  сместиться на вектор(, n)
  поднять перо
кон

Каждый треугольник начинается в точке (, ) — вершина прямого угла. Затем рисуется гипотенуза на вектор (n, −n), нижний катет возвращает на n влево, а вертикальный катет — вверх в исходную точку. Перо снова в (, ), и следующий треугольник строится от той же вершины.