Рисунок на qbasic

Формулировка задачи:

Помогите пожалуйста, ласт задание осталось. Повторить рисунок в qBasic.

Решение задачи: «Рисунок на qbasic»

textual
                            Листинг программы 
                        

                            CLS
SCREEN 11
WINDOW (-12, 9)-(12, -9)
 
CIRCLE (0, 0), 6, , , , .5
CIRCLE (0, 0), .8
CIRCLE (6, 0), .8
CIRCLE (-6, 0), .8
CIRCLE (3, 2.5), .8
CIRCLE (-3, 2.5), .8
CIRCLE (3, -2.5), .8
CIRCLE (-3, -2.5), .8
CIRCLE (0, 8), .8
CIRCLE (0, -8), .8
 
LINE (0, 8)-(6, 0)
LINE (0, 8)-(-6, 0)
LINE (0, 8)-(3, 2.5), , , &HFFF0
LINE (0, 8)-(3, -2.5)
LINE (0, 8)-(-3, 2.5), , , &HFFF0
LINE (0, 8)-(-3, -2.5)
 
LINE (0, -8)-(6, 0)
LINE (0, -8)-(-6, 0)
LINE (0, -8)-(3, 2.5), , , &HFFF0
LINE (0, -8)-(3, -2.5)
LINE (0, -8)-(-3, 2.5), , , &HFFF0
LINE (0, -8)-(-3, -2.5)
 
LINE (0, -8)-(0, 8)
END
                        