Aula 08- Projeto IV

 Aula 08 - Projeto IV

1 Form                            Caption

4 Frame                          Caption

7 Label                            Caption

6 TextBox                       Text

1 Command                    Caption

1 Image

a  = Val (Text1.Text)

b = Val (Text2.Text)

c = Val (Text3.Text)

delta = (b*b) - 4 *a*c

Text4.Text = delta

x1 = (-b + Math.Sqr(delta)) / 2*a

Text5.Text = x1

x2 = (-b - Math.Sqr(delta)) / 2*a

Text6.Text = x2