Рисунок в QBasic

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

Здравствуйте, это мое последнее задание на этой практике, написать прогу для рисунка в QBASIC, заранее спасибо!!! P.S. Спасибо огромное, пользователям geh и Коту Бегемоту за помощь в закрытие мне практике, вы очень мне помогли!!! Без вас бы я не справился

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

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

                            CLS
 
SCREEN 11
 
FOR i = 0 TO 9 STEP 3
   WINDOW (-16, 15)-(16, -6)
   LINE (-3, i)-(3, i)
   LINE (-3, i)-(0, 3 + i)
   LINE (3, i)-(0, 3 + i)
NEXT
END
                        