WAP to print the count of the vowels present in a given sentence.

WAP to print the count of the vowels present in a given sentence.

DECLARE SUB VOWEL (V$)

CLS 

INPUT "ENTER A SENTENCE"; N$

CALL VOWEL (N$)

END

SUB VOWEL (V$)

V$ = "a, e, i, o, u"

IF N$= a AND  e AND I AND o AND u THEN

PRINT "NO. OF VOWEL IS"; N$

NEXT I 

END SUB 

Click here for more...