REM Sentence Reversal Program
CLS
PRINT "Enter a sentence below:"
PRINT
INPUT "", A$
FOR A = 1 TO LEN(A$)
IF MID$(A$, A, 1) <> " " THEN B$ = B$ + MID$(A$, A, 1)
NEXT A
FOR A = LEN(B$) TO 1 STEP -1
C$ = C$ + MID$(B$, A, 1)
NEXT A

FOR A = 1 TO LEN(C$)
B = B + 1
IF MID$(A$, B, 1) = " " THEN PRINT " "; : B = B + 1
PRINT MID$(C$, A, 1);
NEXT A