WAP TO ASK ANY STRING AND COUNT FREQUENCY OF LETTER'a' IN SUPPLIED STRING
CLS
INPUT"ENTER ANY WORD";A$
FOR I=1 TO LEN(A$)
B$=MID$(A$,I,1)
C$=UCASE(B$)
IF C$="A" THEN F=F+1
NEXT I
PRINT"FREQUENCY OF LETTER 'a'=";F
END
CLS
INPUT"ENTER ANY WORD";A$
FOR I=1 TO LEN(A$)
B$=MID$(A$,I,1)
C$=UCASE(B$)
IF C$="A" THEN F=F+1
NEXT I
PRINT"FREQUENCY OF LETTER 'a'=";F
END
Comments
Post a Comment