Нарисовать три окружности, вписанные в квадраты - QBasic
Формулировка задачи:
Очень нужно написать программу именно в QUICK BASIC. Задание: три квадрата в ряд, между ними расстояние любое, и в каждый квадрат вписан круг.Очень нужно...Надеюсь на вашу помощь!
Решение задачи: «Нарисовать три окружности, вписанные в квадраты»
textual
Листинг программы
SCREEN 12 FOR x=10 TO 210 STEP 100 LINE (x, 10)-STEP(90, 90), , B CIRCLE (x+45, 55), 45 NEXT
Объяснение кода листинга программы
- Открывается экран 12.
- Задается шаг 100 для переменной x в диапазоне от 10 до 210.
- Выводится линия (x, 10)-STEP(90, 90), , B. Здесь B - это команда для вывода линии, (x, 10)-STEP(90, 90) это координаты начала линии, заданные через оператор
-
. - Рисуется окружность с центром в точке (x+45, 55) и радиусом 45.
- Цикл NEXT используется для повторения шагов 2-4 для всех значений переменной x от 10 до 210 с шагом 100.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д