DECLARE FUNCTION COUNT ( N$ )
CLS
INPUT "Enter any word"; N$
PRINT "Total number of vowels = "; COUNT ( N$ )
END
FUNCTION COUNT ( N$ )
C = 0
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 C = C+ 1
NEXT I
COUNT = C
END FUNCTION
Subscribe to:
Post Comments (Atom)
-
My father My father name is Prem kumar Sunuwar.He is 39 years old.He is a mansion.He is my super hero of my life. He always help and su...
-
Tour To Dhading Firstly, When I heard that we were going to Dhading for 1 night and 2 days i.e. on saturday and sunday( 16th an...
-
Gai Jatra Gaijatra is the festival of cows.Gai is known as cow and jatra is known as festival in Nepal. This festival is basically cele...
No comments:
Post a Comment