Wap to check the character is capital or small

DECLARE FUNCTION CHECK$(A$)
CLS
INPUT"ENTER ANY CHARACTER";A$
PRINT"THE ENTERED CHARATER IS"; CHECK$(C$)
END

FUNCTION CHECK$(A$)
C = ASC(A$)
IF C>=65 AND C<=91 THEN
CHECK$="UPPER CASE"
ELSEIF C>=97 AND C<=122 THEN
CHECK$="LOWER CASE"
ELSE 
CHTR$="NOT A CHARACTER"
END IF
END FUNCTION

Comments

Popular posts from this blog

Journey With Jagat Mandir❣️

MY FATHER