Для простоты преположим, что Вы остановились на варианте вывода
первой из самых длинных симметричных строк. В этом случае решение может быть примерно таким (псевдокод):
Код:
Dim longest as String ' сюда будем записывать самую длинную симметричную строку
Dim text() as String
text <- введенные строки
longest = ""
Для каждой строки s из text
Если (s - симметричная строка) и (длина(s) > длинa(longest))
longest = s
Вывести longest
Для разбивки текста, введенного пользователем, на отдельные строки можно воспользоваться функцией
Split.
Функцию проверки симметричности строки напишите сами.
Неужели Вы сможете писать подобную программу 5 дней?
После того, как Вы напишите программу в таком простом варианте, можно будет немного усложнить ее, выводя
все самые длинные симметричные строки.
