СОСТАВЛЕНИЕ ПРОГРАММ ДЛЯ ВЫЧИСЛЕНИЙ ЗНАЧЕНИЯ ВЫРАЖЕНИЯ

МАТЕМАТИЧЕСКИЕ ФУНКЦИИ

Тригонометрические: Sin(), Cos(), Tan(), Atn().
Квадратный корень Sqr().
Логарифм Log().
Показательная функция Exp().
Получение

ЗАДАНИЕ

Составить программу для вычисления значения выражения
Значения x и y –

Запишем выражение в одну строку
=(3+2^(y-1))/(1+ x^2*abs(y-tan(x)))

СОЗДАНИЕ ФОРМЫ. 1 СПОСОБ.

Создать форму, присвоить свойству Name значение Frm1.
Создать кнопку,

ПРОГРАММА. 1 СПОСОБ.

Dim sngX As Single, sngY As Single, sngA As

СОЗДАНИЕ ФОРМЫ. 2 СПОСОБ.

Создать форму, присвоить свойству Name значение Frm1.
Создать кнопку,

ПРОГРАММА. 1 СПОСОБ.

Private Sub Cmd1_Click()
txtA.Text= (3+2^(Val(txtY.Text)-1))/ (1+Val(txtX.Text)^2* abs(Val(txtY.Text))-tan(Val(txtX.Text)))
End Sub

ЗАДАНИЕ ДЛЯ САМОСТОЯТЕЛЬНОЙ РАБОТЫ

Составить программу для вычисления значения выражения