• Предмет: Информатика
  • Автор: anastasiausa4iova
  • Вопрос задан 7 лет назад

Здравствуйте,помогите,пожалуйста,сделать сову в qbasic (Screen 12)

Ответы

Ответ дал: vadimvadim2616
0
вот код для qbasic'a SCREEN 12 cls LINE (200, 200)-(350, 400), , B LINE (200, 200)-(275, 100) LINE (275, 100)-(350, 200) CIRCLE (275, 160), 20 PAINT (275, 160) LINE (250, 250)-(300, 300), , B LINE (275, 250)-(275, 300) LINE (250, 270)-(300, 270) LINE (350, 400)-(355, 210), , B LINE (350, 210)-(370, 200), , B LINE (350, 400)-(400, 400) LINE -(400, 380) LINE -(380, 380) LINE -(380, 360) LINE -(355, 360) LINE (325, 165)-(325, 100) LINE -(310, 100) LINE -(310, 145)

Ответ дал: vadimvadim2616
0
это
Вас заинтересует