Program to find a character from a word
CLS
INPUT "Enter a String"; a$
INPUT "Which character you have to find from the given string"; b$
FOR i = 1 TO LEN(a$)
c$ = MID$(a$, i, 1)
NEXT i
IF (c$ = b$) THEN
PRINT "Character found", "("; c$; ")"
ELSE
PRINT "Character doesn't not found"
END IF
END
0 Comments
Thank You ! For your love