CLS
INPUT a$
FOR i = LEN(a$) TO 1 STEP -1
PRINT MID$(a$, i, 1);
NEXT
Тестирование выполнено в программе QB64 ( Скачать )
CLS
INPUT a$
FOR i = LEN(a$) TO 1 STEP -1
PRINT MID$(a$, i, 1);
NEXT
Тестирование выполнено в программе QB64 ( Скачать )