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

Visual Basic.

Question

Информатика

Фетиния

21 апреля, 14:26

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

Visual Basic.

+5

Ответы (1)

Знаете ответ на вопрос?

Глебыч · Answer 1

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

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

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

Visual Basic.