В заданном слове исключить букву,стоящую третьем месте(слово должно быть не менее трех букв — QBasic(Бейсик)

CLS
INPUT "vvedite slovo"; a$
b$ = MID$(a$, 1, 2) + MID$(a$, 4, LEN(a$) - 3)
PRINT b$

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment