Написать программу, которая определяет, является ли введенное слово палиндромом. Выдать сообщeние в MsgBox. вывести проверяемое слово в двух вариантах. Visual Basic.

Предыдущий
вопрос Следующий
вопрос

Dim word As Strin
Dim reversedWord As Strin
Dim i As Intege
Dim isPalindrome As Boolea
word = InputBox("Введите слово для проверки на палиндром:"
word = LCase(word
reversedWord = "
For i = Len(word) To 1 Step -
reversedWord = reversedWord & Mid(word, i, 1
Next
If word = reversedWord The
isPalindrome = Tru
Els
isPalindrome = Fals
End I
If isPalindrome The
MsgBox "Слово " & word & " является палиндромом.", vbInformation, "Результат
Els
MsgBox "Слово " & word & " не является палиндромом.", vbInformation, "Результат
End If