Сосчитать количество букв А в слове
Категория: Basic
2011-12-02 16:29:45
code: #basic
INPUT "vvedite slovo ",a$ FOR i=1 TO LEN(a$) IF MID$(a$,i,1)="A" OR MID$(a$,i,1)="a" THEN n=n+1 NEXT PRINT n
автор: кот Бегемот
Поделиться:
INPUT "vvedite slovo ",a$ FOR i=1 TO LEN(a$) IF MID$(a$,i,1)="A" OR MID$(a$,i,1)="a" THEN n=n+1 NEXT PRINT n
автор: кот Бегемот