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