Ho un problema con la radice quadrata in Pascal

Veramente non è cambiato niente neanche stavolta.

Anzi si dovrebbe essere cambiato qualcosa. Adesso le soluzioni non sono più uguali, e da addirittura i risultati giusti!

No ok, si sapeva, che risultato ti da in quella riga?

Delta = ???

Bene =)

Grazie per l'aiuto che mi hai dato. Dopo aver programmato un risolutore di equazioni di secondo grado in Pascal, dovrei passare ad un risolutore per equazioni di terzo grado, ma questo è molto più difficile, insegnare ad un computer (dato che i computer sono macchine notoriamente cretine) come risolvere equazioni di grado superiore al secondo deve essere una cosa impossibile. Forse è meglio se passo ad imparare il C...

Sì sì ti conviene...alla fine quello che vuoi fare ha difficile la ricerca dell'algoritmo, ma non impari nulla di nuovo...impara cosa nuove è meglio...

Già, anche perchè non saprei proprio come dire ad un computer di applicare la regola di Ruffini.

Appunto, è quello che pensavo....

Ma a questo punto qual'era l'errore nel programma che stavo creando io?

Non aggiornava il valore al delta, che ricordiamo che se non viene assegnato alcun valore il compilatore assegna valore 0, quindi prendeva l"if" delta = 0 e quindi le soluzioni venivano coincidenti

Veramente dicevo perchè mi dava questo errore:



Error: Incompatible types: got "S80REAL" expected "LONGINT"



e soprattutto: se per caso mi ricapitasse, come lo devo risolvere? Adesso il problema è risolto perchè c'era il delta ed è stato aggiornato (a quanto ho capito), ma se mi dovesse capitare di dover fare un'altra radice quadrata all'esterno di un'equazione di secondo grado, come devo risolvere questo problema?

il numero sotto radice quadrata deve essere positivo! Altrimenti ottieni errore...

Tu avevi un problema di fondo...non usavi gli if...

E andavi diretto verso la formula...prima però avresti dovuto controllare che il delta non fosse negativo ( con gli if che ti ho fatto mettere)...altirmenti ottieni errore...

Quindi, prima ti assicuri che il numero sotto radice quadrata è positivo, poi la esegui...

Giusto, gli dovevo per forza dire che il delta deve essere maggiore o uguale a 0, se lo avessi capito prima avrei risparmiato un sacco di tempo. Come odio quando penso ad una soluzione, la scarto ma poi scopro che è la migliore (come in questo caso)!

Eh sì...la radice pari di un numero negativo è un numero complesso...avresti risolto anche dichiarando delta : complex...

Ma così non ti saresti reso conto della negatività del delta...

É sempre meglio affrontare ogni situazione contemplando ogni caso possibile...

Così almeno ogni if ti permette di sapere esattamente che tipo di soluzioni hai...reali e distinte, reali e coincidenti, non reali...

Decisamente meglio così... comunque, dato che ho fallito nel programmare un risolutore di euqazioni di secondo grado, sto provando a creare un risolutore di equazioni di terzo grado, è una questione di orgoglio: dovrò pur riuscire a creare un risolutore di equazioni di un grado che non sia il primo! A parte gli scherzi, credo che per ora sta andando anche abbastanza bene, non ho ancora finito ma posso essere ottimista (forse)

Bene, quando hai finito facci sapere...io non ho mai provato...sono curioso...

Ok, creerò una discussione mettendo come allegato l'eseguibile per far vedere a tutti che sono a fatica riuscito a fare quello che chiunque è in grado di fare senza nessuno sforzo.

Bene, questa discussione è risolta...buona fortuna per la prossima....