Question

write a QB64 program to identify a letter as a vowel and a consonant ​

Answer 1

Explanation:

Qbasic program to check the entered character is vowel or consonant

REM to check the entered character is vowel or consonant

CLS

INPUT "Enter a character:", w$

IF LCASE$(w$)="a" OR LCASE$(w$)="e" OR LCASE$(w$)="i" OR LCASE$(w$)="o" OR LCASE$(w$)="u" THEN

PRINT "The character is Vowel"

ELSE

PRINT "The character is consonant"

END IF

END

Answer 2

Answer:

CLS

A:

PRINT "Enter a letter"

INPUT Q$

IF Q$ = "a" OR Q$ = "e" OR Q$ = "i" OR Q$ = "o" OR Q$ = "u" THEN PRINT " it is a vowel" ELSE PRINT "it is consonant"

PRINT "If you want to continue the click y elso n"

INPUT a$

IF a$ = "y" THEN GOTO A: ELSE END

END