Найти значение функци - VB
Формулировка задачи:
Помогите сделать код. А я в коде я уже разберусь.
Вот что нужно:
Найти значение функции при x=2. у = Cos(x² + 1,43пи) + x/2.
Решение задачи: «Найти значение функци»
textual
Листинг программы
Private Sub Command1_Click() Dim x As Single, y As Single Const PI As Single = 3.14159 x = 2 y = Cos(x ^ 2 + 1.43 * PI) + x / 2 MsgBox "y = " & y End Sub