Задача 1. . На листе Excel (см. рисунок) для создания интерфейса пользователя разместить элементы управления: надпись x=; поле TextBox1 для ввода значения x; надпись z=Вычислить где
Блок – схема.
На листе Excel (см. рисунок) для создания интерфейса пользователя разместить элементы управления: надпись x=; поле TextBox1 для ввода значения x; надпись z=; поле TextBox2 для вывода значения z. Кроме того, на лист Excel поместить кнопку CommandButton1 с надписью Вычислить инаписать процедуру для вычисления указанных функций.
Событийная процедура кнопки Вычислить.
Private Sub CommandButton1_Click() Dim y, a, b, x, z As Single x = TextBox1.Value b = 3 + 2 * x ^ (1 / 3) y = (b * x^ 2 + Sin (b) ^ 3) / (b + x) a = Log (Abs (1.4 – x)) / Log(10) + Tan(b*y) z = y ^ (2 / 3)*Cos(x * y) ^ 2 – Exp(Sqr(Abs(a ^ 2 – 1.3))) TextBox2.Text = Format(z,”0.00000”) End Sub
|
