Рисунок на qbasic

Узнай цену своей работы

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

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

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

textual
Листинг программы
  1. CLS
  2. SCREEN 11
  3. WINDOW (-12, 9)-(12, -9)
  4.  
  5. CIRCLE (0, 0), 6, , , , .5
  6. CIRCLE (0, 0), .8
  7. CIRCLE (6, 0), .8
  8. CIRCLE (-6, 0), .8
  9. CIRCLE (3, 2.5), .8
  10. CIRCLE (-3, 2.5), .8
  11. CIRCLE (3, -2.5), .8
  12. CIRCLE (-3, -2.5), .8
  13. CIRCLE (0, 8), .8
  14. CIRCLE (0, -8), .8
  15.  
  16. LINE (0, 8)-(6, 0)
  17. LINE (0, 8)-(-6, 0)
  18. LINE (0, 8)-(3, 2.5), , , &HFFF0
  19. LINE (0, 8)-(3, -2.5)
  20. LINE (0, 8)-(-3, 2.5), , , &HFFF0
  21. LINE (0, 8)-(-3, -2.5)
  22.  
  23. LINE (0, -8)-(6, 0)
  24. LINE (0, -8)-(-6, 0)
  25. LINE (0, -8)-(3, 2.5), , , &HFFF0
  26. LINE (0, -8)-(3, -2.5)
  27. LINE (0, -8)-(-3, 2.5), , , &HFFF0
  28. LINE (0, -8)-(-3, -2.5)
  29.  
  30. LINE (0, -8)-(0, 8)
  31. END

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 3.75 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут