INPUT "vvedite slovo s = "; s$FOR i = LEN(s$) TO 1 STEP -1PRINT MID$(s$, i, 1);NEXT iEND
получение новой строки
INPUT "vvedite slovo s = "; s$FOR i = LEN(s$) TO 1 STEP -1r$ = r$ + MID$(s$, i, 1)NEXT iPRINT r$END
INPUT "vvedite slovo s = "; s$
FOR i = LEN(s$) TO 1 STEP -1
PRINT MID$(s$, i, 1);
NEXT i
END
получение новой строки
INPUT "vvedite slovo s = "; s$
FOR i = LEN(s$) TO 1 STEP -1
r$ = r$ + MID$(s$, i, 1)
NEXT i
PRINT r$
END