• Предмет: Информатика
  • Автор: katya04112000
  • Вопрос задан 2 года назад

по заданной строке и символу определить сколько раз встречается этот символ в этой строке. информатика .Qbasike функции

Ответы

Ответ дал: mnv1962
1
DIM b AS STRING * 1
DIM a AS STRING * 100
DIM i, k, n AS INTEGER
INPUT "INPUT STRING", a$
INPUT b$
k = LEN(a$)
FOR i = 1 TO k
IF MID$(a$, i, 1) = b$ THEN 
n = n + 1
END IF
NEXT i
PRINT n
END
Вас заинтересует