1. Главная
  2. Библиотека
  3. Информатика
  4. Составить программу на языке Basic для выполнения расчетов: зед равно игрек в квадрате минус пятнадцать. ...

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

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

Условие:

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

Решение:

Составим блок-схему программы (рис. 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...

Не нашел нужную задачу?

Воспользуйся поиском

Выбери предмет