Написать программу, которая определяет, является ли введенное слово палиндромом. Выдать сообщeние в MsgBox. вывести проверяемое слово в двух вариантах. Visual Basic.
Написать программу, которая определяет, является ли введенное слово палиндромом. Выдать сообщeние в MsgBox. вывести проверяемое слово в двух вариантах. Visual Basic.
Похожие вопросы
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Dim reversedWord As String
Dim i As Integer
Dim isPalindrome As Boolean
word = InputBox("Введите слово для проверки на палиндром:")
word = LCase(word)
reversedWord = ""
For i = Len(word) To 1 Step -1
reversedWord = reversedWord & Mid(word, i, 1)
Next i
If word = reversedWord Then
isPalindrome = True
Else
isPalindrome = False
End If
If isPalindrome Then
MsgBox "Слово " & word & " является палиндромом.", vbInformation, "Результат"
Else
MsgBox "Слово " & word & " не является палиндромом.", vbInformation, "Результат"
End If