Презентация на тему по информатике Решение квадратных уравнений в среде программирования Visual Basic

a не равно 0
x - переменная,
a,b,c - постоянные (числовые)

коэффициенты.
В общем случае решение квадратных уравнений сводится к нахождению дискриминанта: 
Формула дискриминанта:

равны:

0;

2) 9х2 – 6х + 10 = 0;

3) х2

+ 2х – 2 = 0;

4) х2 – 3х – 1 = 0;

a = 1; b= –5; c = 1

a = 9; b= –6; c = 10

a = 1; b= 2; c = –2

a = 1; b= –3; c = –1

Val(TextBox2.Text) ^ 2 - 4 *
Val(TextBox1.Text) * Val(TextBox3.Text)

If TextBox4.Text < 0 Then
Label7.Text = "Корней нет"
TextBox5.Text = ""
TextBox6.Text = ""
Else : Label7.Text = "Корни уравнения"
TextBox5.Text = (-Val(TextBox2.Text) +
Math.Sqrt(Val(TextBox4.Text))) / (2 * Val(TextBox1.Text))
TextBox6.Text = (-Val(TextBox2.Text) –
Math.Sqrt(Val(TextBox4.Text))) / (2 * Val(TextBox1.Text))
End If
End Sub

9х2 – 6х + 10 = 0;

3) х2 +

2х – 2 = 0;

4) х2 – 3х – 1 = 0;