[Vb.Net] Calcolare due numeri dato la somma e il prodotto

[Boolean]

Scusami, vabene che non sei in seconda superiore, però si suppone che tu sappia risolvere un'equazione di secondo grado, no?

nel momento in cui, allo svolgimento del sistema ti trovi con:



come vuoi risolverla, se non con la formula:



?

Chiedere che ti si scriva tutto il codice, poi, mi sembra piuttosto azzardato...

Boolean

[frank094]

Equazioni del genere le risolviamo con la legge dell'annullamento del prodotto con la quale devo fattorizzare la parte sinistra dell'equazione e poi altro... invece così non l'ho visto mai.

Comunque chiedevo se solo avessi voglia di scrivere la parte di codice sul trovare i due numeretti, mi rendo conto che non dovrei farlo, ma come ho già detto era inteso per "Se hai voglia".

Comunque sia io ora provo a farlo se non riesco posto qui e vi dico qual'è il problema.

[Boolean]

Le "equazioni del genere" non credo tu possa risolverle con la legge dell'annullamento del prodotto, che si usa per le equazioni reciproche (al limite le spurie)...
Comunque, non si tratta di aver voglia o meno, ma solo di costruttività dell'azione. Fornirti la soluzione bella e pronta non ti aiuta di certo a ragionare.
In ogni caso, credo che adesso tu abbia tutte le nozioni a disposizione per implementare il tuo algoritmo.

Boolean

[frank094]

Naturalmente prima della soluzione vorrei ragionarci su ma non mi viene proprio l'ultima parte, non ho problemi nel codice.
Come dovrei fare con le variabili o con quale altro modo? Ho un idea di come costruirlo il programma ma non il modo di impostarlo.
Ad esempio il passaggio dove c'è y = 3 - x in questo caso sarà il valore del secondo numero = x+y - l'altro numero ma in questo caso come posso scriverlo nel programma in modo che poi alla fine restituisca solo i valori e non tutti i passaggi?

[Boolean]

L'equazione di secondo grado è la tua soluzione!

x^2 avrà come coefficiente sempre 1, mentre gli altri 2 termini sono la x che avrà come coefficiente la somma di x e y e l'ultimo termine che è il loro prodotto.

devi solo risolvre l'equazione utilizzando questi dati:

x = (-b (+/-) Sqr(b^2 - (4 * a * c))) / (2 * a)

x1 = (-3 + Sqr(3^2 - (4 * 1 * 2))) / (2 * 1)
x2 = (-3 - Sqr(3^2 - (4 * 1 * 2))) / (2 * 1)

Boolean

[frank094]

Ho fatto così ma non mi va bene:

TextBox4.Text = TextBox3.Text * TextBox1.Text ' xy
        TextBox5.Text = TextBox2.Text ' x+y

        Dim a = TextBox1.Text  ' Il coefficiente di x^2
        Dim b = TextBox5.Text  ' x+y
        Dim c = TextBox4.Text  ' xy

        Dim x = (-b + Sqrt(b ^ 2 - (4 * a * c))) / (2 * a)
        Dim y = b - x
        TextBox6.Text = x
        TextBox7.Text = y

Ma non mi ridà, cos'ho sbagliato? Con tutti questi TextBox non mi ritrovo bene e mi confondo tra le variabili.. sapresti trovare l'errore?

[Boolean]

Originariamente inviato da Boolean

Nell'equazione b è negativo. devi riprodurre questa condizione anche quando sostituisci i termini nella formula di risoluzione dell'equazione.

Boolean

[frank094]

Non ho capito... il -b c'è..!
Comunque sia potresti riscrivermi il mio codice con la correzione che intendi?

[Boolean]

vedo che in algebra stai messo discretamente male, eh? :rollo:

        Dim a As Integer = 1
        Dim b As Integer = -CInt(txtSomma.Text)
        Dim c As Integer = CInt(txtProdotto.Text)
        Dim x As Integer = (-b + Math.Sqrt(b ^ 2 - (4 * a * c))) / (2 * a)
        Dim y As Integer = (-b - Math.Sqrt(b ^ 2 - (4 * a * c))) / (2 * a)
        MessageBox.Show(x & ", " & y)

Ti consiglio di studiare più approfonditamente... tieni conto del fatto che non potrai mai e poi mai far eseguire qualcosa ad un computer se non sai farla tu, in prima persona.

Boolean

[frank094]

Ora provo, comunque sia la scomposizione so farla di persona, peccato solo che questi tipi di algoritmi o quello che sono xD non li abbiamo neanche lontanamente studiati.. quindi ...
Comunque grazie

Edit: Il programma si gblocca su questa stringa -> Dim b As Integer = -CInt(txtSomma.Text) ... come posso risolvere?