Thursday, February 25, 2016

Given character

PROGRAM WHICH WHICH PRINTS THE REPETITION OF A GIVEN LETTER IN A GIVEN SENTENCE.

CLS
INPUT “enter a word”; a$
INPUT “enter a letter which u want to check”; b$
FOR i = 1 TO LEN(a$)
c$ = MID$(a$, i, 1)
IF c$ = b$ THEN
c = c + 1
END IF
NEXT
PRINT “the toral repetition of”; b$; “is”; c
END