Re-write the below program correcting the bugs
CLS
ENTER "ENTER A STRING", NS
A=LEN(N)
FOR I=A TO 1 STEP 2
XS-XS-MID(N$,1,1)
NEXT
IF N=5
PRINT “IT IS PAUNDROME"
ELSE
PRINT “IT IS NOT PALINDROME"
ENDIF
END