To check the entered character is alphabet or not. (Qbasic Code)

To check the entered character is alphabet or not.

• CLS
  INPUT "Enter character"; c$
  ch$ = UCASE$(c$)
  a = ASC(ch$)
  IF a >= 65 AND a <= 90 THEN
      PRINT "The given character is alphabet"
  ELSE
      PRINT "The given character is not alphabet"
  END IF
  END

Share :

X