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

CLS
SCREEN 9
FOR i = 1 TO 6
    x = 167 * i
    LINE (0, 0)-(x, 350)
NEXT

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

Leave a Comment