zadach38.BAS

{* Задача38 *}

REM basic

' Перевернуть текст наоборот


10   INPUT A$
20   B=LEN(A$)
30   For I=B To 1 Step -1
40   С$=Mid$(A$,I,1)
50   D$=D$+C$
60   Next    I
70   PRINT   D$  
80   End