DECLARE SUB REV(N$)
CLS
INPUT"ENTER ANY WORD";N$
CALL REV(N$)
END
SUB REV(N$)
FOR I= LEN(N$) TO 1 STEP -1
B$=MID$(N$,I,1)
C$=C$+B$
NEXT I
PRINT"The reversed word=";C$
END SUB
Subscribe to:
Post Comments (Atom)
My journey of Jagat Mandir School
13 Years of ExperiencE It is also said that school is the next home of every child. "Failing and learning," Teachers are like...
-
Dashain and tihar is the best festival i have celebrated in me life. Because it give time to visit our family member in one year and ce... -
Sericulture Seri culture is the cultivation of silk worms to produce silk. There are five major types of silk of commercial importance,...
No comments:
Post a Comment