Задача 1. Сформировать по строке а$ новую строку по правилу: если слово имеет нечетную длину, удалить в нем среднюю буквуQbasic
Задача 1.
Сформировать по строке а$ новую строку по правилу: если слово имеет нечетную длину, удалить в нем среднюю букву
Qbasic
Гость
Ответ(ы) на вопрос:
ГостьINPUT "Vvedi stroku: ", s$
n = LEN(s$)
IF n MOD 2 <> 0 THEN
s$ = LEFT$(s$, (n - 1) / 2) + RIGHT$(s$, (n - 1) / 2)
END IF
PRINT s$
END
Не нашли ответ?
Похожие вопросы