Ввести с клавиатуры слово, и вывести его на экран без букв А

Категория: Basic

2011-12-13 16:18:37

code: #basic

INPUT"vvedite slovo ",a$
FOR i=1 TO LEN(a$)
IF MID$(a$,i,1)<>"a"THEN b$=b$+MID$(a$,i,1)
NEXT
PRINT b$

автор: кот Бегемот

Поделиться:

Sample Code