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

CLS (COLOR 10) — для красоты (a- слово будет двигаться бесконечноFOR i=1 TO 75CLSLOCATE 12, iPRINT "QBasic"FOR k=1 TO 20000NEXT kNEXT iFOR i=75 TO 1 STEP -1CLSLOCATE 12, iPRINT "QBasic"FOR k=1 TO 20000NEXT kNEXT i (GOTO a) — слово будет двигаться бесконечно (Чем больше выделенное число, тем медленнее двигается слово, на разных ПК по-разному)