Question

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

Answer 1

screen 12
line(10,20)-(160,20)
line(320,20)-(480,20)
line(640,20)-(800,20)
line(960,20)-(1010,20)
line(10,25)-(160,60),b
line(320,25)-(480,60),b
line(640,25)-(800,60),b
line(960,25)-(1010,60),b