1 2 3 4 5 | 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+1NEXTPRINT n |
1 2 3 4 5 | 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+1NEXTPRINT n |