Calculador de equações do segundo grau

[Rick Martin 3]

bom estava lendo essa pagina :

http://www.exatas.mat.br/equacao2.htm

foi ai que me veio a ideia de desenvolver 1 programinha que resolvese a formula inteira

da saiu meu programa que resolve equçoes de segundo grau no formato basico

ax² + bx + c = numero inteiro

estou anexando no post

2 grau.rar

e aqui está o codigo que eu usei para vcs derem uma olhada e comentarem :

Public Class Form1

Dim a As Decimal = 0

Dim b As Decimal = 0

Dim c As Decimal = 0

Dim d As Decimal = 0

Dim x1 As Decimal = 0

Dim x2 As Decimal = 0

Dim equaçao As String

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If TextBox2.Text = String.Empty Then

MsgBox("Informe um valor numérico para o coeficiente A da equação")

Exit Sub

End If

If TextBox3.Text = String.Empty Then

MsgBox("Informe um valor numérico para o coeficiente B da equação")

Exit Sub

End If

If TextBox4.Text = String.Empty Then

MsgBox("Informe um valor numérico para o coeficiente C da equação")

Exit Sub

End If

If TextBox5.Text = String.Empty Then

MsgBox("Informe um valor numérico da equação")

Exit Sub

End If

a = TextBox2.Text

b = TextBox3.Text

c = TextBox4.Text

d = TextBox5.Text

equaçao = a & "x^2 + " & b & "x + " & c & " = " & d

c = c - d

If ((b ^ 2 - 4 * a * c) = 0) = True Then

x1 = ((0 - B) + Math.Sqrt(b ^ 2 - 4 * a * c)) / (2 * a)

TextBox1.Text = x1

MsgBox("Existe somente uma solução para esta equação.")

End If

If ((b ^ 2 - 4 * a * c) < 0) = True Then

MsgBox("Não há raizes reais para esta equação.")

Exit Sub

End If

If a = 0 Then

a = TextBox2.Text

b = TextBox3.Text

c = TextBox4.Text

d = TextBox5.Text

x1 = ((d - c) / B)

TextBox1.Text = x1

MsgBox("Há somente uma solução para equação linear.")

Exit Sub

End If

x1 = ((0 - B) + Math.Sqrt(b ^ 2 - 4 * a * c)) / (2 * a)

x2 = ((0 - B) - Math.Sqrt(b ^ 2 - 4 * a * c)) / (2 * a)

TextBox1.Text = x1

TextBox6.Text = x2

End Sub

End Class

[xSlash 29]

Muito bom o programa.

Eu nunca usaria pois umas das matérias mais fácil na area da matemática é equação de segundo grau.Aqui vai um conselho para quem está fazendo o ensino médio ou irá ver a matéria...é melhor aprender a fazer,tudo direitinho e com o tempo se torna fácil,pois vai ser preciso tanto para o vestibular como na faculdade dependendo do curso e não terá o programa para usar na hora da prova.

Abraços!

[Puncker 201]

Estou contente que você está tendo idéias como essa, o povo acha que é inútil mas pra min é perfeito pra desenvolver suas técnicas em programação. Enfim... muito bom cara continue assim a sua lógica está muito boa.

REP+

[Rick Martin 3]

Muito bom o programa.

Eu nunca usaria pois umas das matérias mais fácil na area da matemática é equação de segundo grau.Aqui vai um conselho para quem está fazendo o ensino médio ou irá ver a matéria...é melhor aprender a fazer,tudo direitinho e com o tempo se torna fácil,pois vai ser preciso tanto para o vestibular como na faculdade dependendo do curso e não terá o programa para usar na hora da prova.

Abraços!

sim , eu tambem nao aconselho o uso e realmente equação de segundo grau é facil , mais criar 1 programa que resolve para min foi 1 desafio eu crio programas que calculam formulas pq ajudam bastante na "lógica" e a desenvolver 1 codigo legal , mais é claro que se deve aprender passo a passo e n ficar nas custas de 1 programa

Estou contente que você está tendo idéias como essa, o povo acha que é inútil mas pra min é perfeito pra desenvolver suas técnicas em programação. Enfim... muito bom cara continue assim a sua lógica está muito boa.

REP+

o obrigado punker pelo elogio em questão da logica estou muito contente tb . cada vez que termino 1 programa mesmo ele sendo muito basico da 1 orgulho para falar eu que fiz gostaria que vs desse uma olhada tb no meu navegador basico que está nessa msm seção e abraço.