Определить, является ли заданное слово словом-перевертышем (шалаш — слово-перевертыш). - VB

Формулировка задачи:

Пожалуйста, помогите решить задачи 1.Один из наиболее эффективных способов вычисления квадратного корня основывается на том, что сумма первых n нечетных чисел равна n2. Составить программу, вычисляющую модуль квадратного корня из n для заданного натурального n, используя указанное свойство ([x] — целая часть x). 2.В первой строке активного листа заданы N значений одномерного массива X. Вывести во вторую строку те элементы, значения которых принадлежат диапазону [a; b]. 3.Отрицательные элементы вещественной матрицы заменить максимальным элементом. 4.Определить, является ли заданное слово словом-перевертышем (шалаш — слово-перевертыш).

Решение задачи: «Определить, является ли заданное слово словом-перевертышем (шалаш — слово-перевертыш).»

textual
                            Листинг программы 
                        

                            Sub Task()
Dim sStr As String
sStr = InputBox("Слово:")
MsgBox IIf(LCase(sStr) = LCase(StrReverse(sStr)), "Перевертыш", "Не перевертыш")
End Sub
                        