DECLARE SUB DIS(N$)
CLS
INPUT"ENTER ANY WORD";N$
CALL DIS(N$)
END
SUB DIS(N$)
FOR I = 1 TO LEN(N$)
B$=MID$(N$,I,1)
C$=UCASE$(B$)
IF C$="A" OR C$="E" OR C$="I" OR C$="O" OR C$="U" THEN
PRINT C$
NEXT I
END SUB
Subscribe to:
Post Comments (Atom)
-
Each and every person have got a superhero, and for me its my Dad. My father Love U Dad name is Mlangai Tamang. He is a Technician. H... -
Raksha Bandhan, one of the main Hindu festivals, is celebrated to strengthen the brother sister bond. On this day, the sisters tie a sacr...
No comments:
Post a Comment