Как сделать елку в программе Qbasic с звездой и шариками??

Предыдущий
вопрос Следующий
вопрос

Вот пример кода на QBasic, который создает елку с звездой и шариками:

SCREEN 12
CLS
' Звезда
LINE (320, 50)-(360, 90), , B
LINE (320, 90)-(360, 50), , B
LINE (340, 50)-(340, 100), , B
LINE (310, 70)-(370, 70), , B
' Шарики
CIRCLE (320, 150), 30
CIRCLE (300, 200), 20
CIRCLE (350, 200), 20
' Ёлка
LINE (320, 200)-(270, 350), , B
LINE (320, 200)-(370, 350), , B
LINE (290, 250)-(350, 250), , B
LINE (300, 300)-(340, 300), , B
LINE (310, 350)-(330, 350), , B
' Подставка
LINE (300, 350)-(340, 350), , B
DO
LOOP UNTIL INKEY$ <> ""
SCREEN 1
END

Просто скопируйте этот код в редактор QBasic и запустите программу, чтобы увидеть как рисуется елка с звездой и шариками. Вам также может понадобиться настроить параметры рисования, чтобы получить желаемый результат.