Информатика, опубликовано 2018-08-22 18:36:36 by Гость
Написать программу, которая определяет, является ли введенное слово палиндромом. Выдать сообщeние в MsgBox. вывести проверяемое слово в двух вариантах. Visual Basic.
Ответ оставил Гость
Sub Z1()
Dim x, y As String
x = InputBox("Введите слово: ")
For i = Len(x) To 1 Step -1
y = y + Mid(x, i, 1)
Next i
MsgBox ("Перевернутое слово: " + y)
If x = y Then
MsgBox ("Это палиндром")
Else: MsgBox ("Это не палиндром")
End If
End Sub
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на