{* Задача39 *}

REM basic

' Символьная строка. Сколько раз в этой последовательности встречается “A”?


10   INPUT    A$
20   B=LEN(A$)
30   For   I=1    To   B
40   С$=Mid$(A$,I,1)
50   If C$=”A”   Then   K=K+1
60   Next   I
70   PRINT   K
80   End