Проверка слова на палиндром - VB
Формулировка задачи:
Какой будет код для проверки слова на палиндром?
очень срочно
Например вводим слово казак и нам выдаёт это слово является палиндром
очень нужно я не как разобратся не могу
Решение задачи: «Проверка слова на палиндром»
textual
Листинг программы
Function f(s As String) As Boolean If Len(s) > 1 Then If StrComp(Left$(s, 1), Right$(s, 1), vbTextCompare) = 0 Then f = f(Mid$(s, 2, Len(s) - 2)) Else f = True End If End Function