Нужна ваша помощь в решении задач!! - VB

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

Уважаемые, прошу помощи в решение задач.задача 1: (синус заменяется на косинус) нужно решить номер 11. задача 2: Для каждой линии определить по плану основной вид продукции(продукция,выпуск которой наибольший в количественном выражении).Напечатать номер вида продукции и количество выпуска. * При вводе результатов выделить зеленым фоном абсолютно наибольший выпуск.задача 3: Элементы четных столбцов массива А расставить в порядке возрастания абсолютной величины n=4 m=6. Данные для контрольного просчета: Заранее благодарна!

Решение задачи: «Нужна ваша помощь в решении задач!!»

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

                            Dim X
Dim B
X = 13 / 5
B = 4.13
n1 = Sqr(Abs(X ^ 3 - 5)) * Log(X ^ 4 - 5)
n2 = X ^ 3 - 24 - 31.27 * n1
chislitel = Cos(n2) ^ 2
n3 = Sqr(24) - 46 * X ^ 3 - 27 - Sin(atn(X ^ 3))
znamenatel = Exp(X * Log(n3))
otvet = B * chislitel / znamenatel
                        