A quadratic equation can be written in the form ax2 bx c

A quadratic equation can be written in the form: ax^2 + bx + c = 0 (a notequalto 0) These equations have two solutions, which can be found by using the formula x = -b plusminus Squareroot b^2 - 4ac/2a Where the discriminant in this formula is equal to D = b^2 - 4ac The three possible types of quadratic equation roots are: Real and unequal roots, when D = b^2 - 4ac > 0 Real and equal roots, when D = b^2 - 4ac = 0 Imaginary roots, when D = b^2 - 4ac

Solution

1)

Private Sub cmdClear_Click()
Text1.Text = “”
Text2.Text = “”
End Sub
Private Sub cmdExit_Click()
Unload Me
End Sub

Private Sub cmdFind_Click()
Dim a, b, c As Integer
Dim z, root1, root2 As Double
b = Val(InputBox(“Firstly enter value for b”))
a = Val(InputBox(“secondly enter value for a”))
c = Val(InputBox(“finally please enter value for c”))

z = Sqr(b * b – (4 * a * c))
root1 = (z + s) / (2 * a)
root2 = (-b + z) / (2 * a)
Text1.Text = root1
Text2.Text = root2
End Sub