Question

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

Answer 1

CLS

SCREEN 15

LiNE(700,500)-(500,300),0

LINE(500,300)-(300,500),0

LINE(300,500)-(400,600),0

LINE(400,600)-(400,400),0

LINE(400,400)-(600,400),0

LINE(600,400)-(600,600),0

LINE(600,600)-(400,600),0

LINE(400,600)-(500,700),0

LINE(500,700)-(700,500),0

LINE(700,500)-(700,300),0

LINE(700,300)-(500,100),0

LINE(500,100)-(100,500),0

LINE(100,500)-(500,900),0

LINE(500,900)-(900,500),0

LINE(900,500)-(700,300),0

LINE(700,300)-(300,300),0

LINE (300,300)-(300,700),0

LINE(300,700)-(700,700),0

LINE(700,700)-(700,500),0

END