Написать программу, в результате выполнения которой слово “QBASIC” пробежит по экрану слева направо и справа налево.

Написать программу, в результате выполнения которой слово “QBASIC” пробежит по экрану слева направо и справа налево.
Гость
Ответ(ы) на вопрос:
Гость
CLS (COLOR 10) - для красоты (a:) - слово будет двигаться бесконечно FOR i = 1 TO 75 CLS LOCATE 12, i PRINT "QBasic" FOR k = 1 TO 20000 NEXT k NEXT i FOR i = 75 TO 1 STEP -1 CLS LOCATE 12, i PRINT "QBasic" FOR k = 1 TO 20000 NEXT k NEXT i (GOTO a) - слово будет двигаться бесконечно (Чем больше выделенное число, тем медленнее двигается слово, на разных ПК по-разному)
Не нашли ответ?
Ответить на вопрос
Похожие вопросы