Даны слова а$ и b$. Если их длина четная, удалить 2 средние буквы, если нет одну — Basic(Бейсик)

a$ = "1234567"
b$ = "123456"
 
lenA = LEN(a$) - 1
lenB = LEN(b$) - 1
a$ = LEFT$(a$, lenA\2) + RIGHT$(a$, lenA\2)
b$ = LEFT$(b$, lenA\2) + RIGHT$(b$, lenA\2)
 
PRINT a$
PRINT b$

Leave a Comment