1 2 3 4 5 | INPUT"vvedite slovo ",a$FOR i=1 TO LEN(a$)IF MID$(a$,i,1)<>"a"THEN b$=b$+MID$(a$,i,1)NEXTPRINT b$ |
1 2 3 4 5 | INPUT"vvedite slovo ",a$FOR i=1 TO LEN(a$)IF MID$(a$,i,1)<>"a"THEN b$=b$+MID$(a$,i,1)NEXTPRINT b$ |