Skip to main content

PROGRAMMING 9

WAP TO ENTER ANY WORD & REVERSE IT

 CLS
INPUT"Enter any word";A$
FOR I = LEN(A$) TO 1 STEP -1
B$=MID$(A$,I,1)
C$=C$+B$
NEXT I
IF C$=A$ THEN
PRINT"GIVEN STRING IS PALINDROME"
ELSE
PRINT"GIVEN STRING ISN'T PALINDROME"
END IF
END

Comments

Post a Comment

Popular posts from this blog

                                  ORPHANAGE VISIT                                      BY SEE BATCH 2075 “Don’t give to eat, give to inspire others” With this motto in our mind, we reflected the sense of the above mentioned statement in our actions. On March 4 2019(Monday) on the special occasion of Shivaratri, we visited Nepal Children’s Home, Siphal, Kathmandu  which has been actively  working since 2021 BS for raising orphans, disables & needy ones. There  were 108 orphans & disabled above 4 years to 35 years old. There also lived 6  orphans of our age, appearing for SEE this year.   With help & support from our class teacher Deepak Sir & cooperation among students of Grade X, we were able to help the children living there with various educ...
Post a Comment
Read more
DECLARE FUNCTION REVE$(S$) S$="NEPS" PRINT REVE$(S$) END FUNCTION REVE$(S$) C$=MID$(S$,1,1) IF C$=" " THEN REVE$=" " ELSE FOR I = 1 TO LEN(S$) VE$=MID$(S$,I,1) + VE$ NEXT I REVE$=VE$ END IF  END FUNCTION O/P SPEN
Post a Comment
Read more

PROGRAMMING 8

WAP TO INPUT ANY STRING & COUNT TOTAL NUMBER OF VOWELS CLS INPUT"ENTER ANY WORD";A$ FOR I=1 TO LEN(A$) B$=MID$(A$,I,1) C$=UCASE$(B$) IF C$="A" OR C$="E" OR C$="I" OR C$="O" OR C$="U" THEN V=V+1 NEXT I PRINT"TOTAL NO. OF VOWELS=";V END
Post a Comment
Read more