Page 82 - 4192

Таблиця 17– Приклади друку операторів присвоювання
Математичний запис Запис на Visual Basic
2
3
arctgx  cos x Y=3*(Atn(x^2)+Cos(x)^3)/abs(x-
y  3
3 x  a a)^(1/3)
2
sqr (x ^ 2  ^ y ) 2  5 . 1 * 10 x
a  a=(Sqr(x^2+y^2)-
3
2
2
cos x  sin y 3 1.5E2*x)/(cos(x^3)^2+sin(y^3)^2)

Приклад. Процедура з використанням операторів
описання, вводу, виводу та присвоювання. Обчислити вираз
2
2
Y=x +sinz+tg (z+x), де x=3.4; z=5.6 .
1. Відкрити нову форму Visual Basic (рис. 2.2)
2. На панелі інструментів Стандартная натиснути
кнопку Исследователь Программы.
3. У вікні Программы – Проект 1 (рис. 2.2) натиснути
кнопку Просмотреть код.
4. Відкриється вікно Проект1 – Форма1 (Код).
Після вибору ім'я об’єкта Form та ім'я події Load,
відкриється вікно коду процедури Form_ Load()
5. Тіло процедури (програми) записуємо між
операторами Private Sub Form_Load() та End Sub.

Private Sub Form1_Load()
Dim x!, y!, z!
x=Val(InputBox(“x=”))
z=Val(InputBox(“x=”))
y=x^2+sin(z)+tan(z+x)^2
Print x, y, z
End sub

81