Построить совокупность n квадратов с общим центром - QBasic
Формулировка задачи:
Построить совокупность п квадратов с общим центром.
Решение задачи: «Построить совокупность n квадратов с общим центром»
textual
Листинг программы
- CLS
- INPUT "N = "; n
- SCREEN 11
- WINDOW (-12, 9)-(12, -9)
- FOR i = 1 TO n
- LINE (-8 / i, 8 / i)-(8 / i, -8 / i), , B
- NEXT i
- END
Объяснение кода листинга программы
- CLS — команда очистки экрана
- INPUT
N =; n — ввод числа n с клавиатуры - SCREEN 11 - установка размера экрана 11
- WINDOW (-12, 9)-(12, -9) — установка области вывода на экран
- FOR i = 1 TO n — начало цикла для перебора от 1 до n
- LINE (-8 / i, 8 / i)-(8 / i, -8 / i), , B — рисование линии с координатами (-8/i, 8/i) и (-8/i, -8/i) с шагом 1/i и цветом B
- NEXT i — переход к следующей итерации цикла
- END — конец программы
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
