Palindrome string
REM Program to check whether a supplied string is palindrome or not
CLS
INPUT "ENTER A STRING/WORD";N$
L=LEN(N$)
FOR I= 1 TO L
M$=MID$(N$,I,1)+M$
NEXT I
IF M$=N$ THEN
PRINT "THE SUPPLIED STRING IS PALINDROME"
ELSE
PRINT "THE SUPPLIED STRING IS NOT PALINDROME"
END IF
END