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) - слово будет двигаться бесконечно
(Чем больше выделенное число, тем медленнее двигается слово, на разных ПК по-разному)
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку