- в естественной последовательности;
- в обратной последовательности
1 2 3 4 5 | word1$ = "" INPUT " Type a word "; word1$ FOR i = 1 TO Len(word1$) PRINT MID$(word1$, i, 1 ); " "; MID$(word1$, Len(word1$)+ 1 -i, 1 ) NEXT |
1 2 3 4 5 | word1$ = "" INPUT " Type a word "; word1$ FOR i = 1 TO Len(word1$) PRINT MID$(word1$, i, 1 ); " "; MID$(word1$, Len(word1$)+ 1 -i, 1 ) NEXT |