Составить программу на языке Basic для выполнения расчетов: зед равно игрек в квадрате минус пятнадцать. .

Составим блок-схему программы (рис. 1).

Код программы:

' Вычисление значения

Private Sub CommandButton1_Click()

Dim y, z As Double

y = CDbl(Me.TextBox1.Text) ' Чтение введенного значения в переменную

z = y * y - 15 ' Вычисление z

Me.TextBox2.Text = CStr(z) ' Вывод результата

End Sub

' Очистка текстовых полей

Private Sub...