Найти дискриминант для заданного уравнения - VB

Узнай цену своей работы

Формулировка задачи:

y=a*x^2+b*x+c помогите, плиз!

Решение задачи: «Найти дискриминант для заданного уравнения»

textual
Листинг программы
Private Sub Command2_Click()
a = Val(InputBox("Введіть значення a "))
b = Val(InputBox("Введіть значення b "))
c = Val(InputBox("Введіть значення c "))
Print "Дискриминант D = "; b ^ 2 - 4 * a * c
 
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4 из 5
Похожие ответы