Нарисовать вложенные окружности- QBasic(Бейсик)

disel
1
2
3
4
5
6
CLS
SCREEN 9
FOR i = 1 TO 5
    r = 27 * i
    CIRCLE (r, 175), r, , , , 1
NEXT

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment