Quartic Equation Solver

You have not uploaded your program! Please edit the page to upload your program.

Author: Myles_Zadok Download: QUARTIC.8xpNo Download Available Version: 1.0 Compatibility: TI-83/84/+/SE File Size: 333 Bytes Genre: Arcade Graphics Platform Puzzle RPG Strategy Sports Casino Board Utility Misc Rating:
Asks the user for the coefficients of the five quartic terms and calculates the value of each of the four roots.

What the community thinks:

Written Code

Myles_Zadok 12 Apr 2017 02:26

:a+bi
:Prompt A,B,C,D,E
:(8AC-3(B^2))/(8(A^2))→G
:((B^3)+8D(A^2)-4ABC)/(8(A^3))→H
:(C^2)-3BD+12AE→I
:2(C^3)-9BCD+27(B^2)E+27A(D^2)-72ACE→J
:cuberoot((J+squareroot((J^2)-4(I^3)))/2)→K
:0.5squareroot((-2/3)G+(1/(3A))(K+(I/K)))→L
:(-B/(4A))-L+0.5squareroot(-4(L^2)-2G+(H/L))→M
:(-B/(4A))-L-0.5squareroot(-4(L^2)-2G+(H/L))→N
:(-B/(4A))+L+0.5squareroot(-4(L^2)-2G-(H/L))→P
:(-B/(4A))+L-0.5squareroot(-4(L^2)-2G-(H/L))→Q
:Disp "ROOTS ARE",M
:Disp N
:Disp P
:Disp Q

Last edited on 15 Apr 2017 23:03 by Myles_Zadok Show more

Re: Written Code

Xeda Elnara 15 Apr 2017 20:48

Pretty cool, you should try a quintic equation silver ;) I don't have my calc to test, but I think I can optimize!

:a+bi
:ClrList L1
:Prompt A,B,C,D,E
:2C-3B²/(4A²→G
:DAֿ¹+(B³-4ABC)/(8A³→H
:C²-3BD+12AE→I
:2C³-9(BCD-3B²E-3AD²+8ACE
:³√(.5(Ans+√(Ans²-4I³
:ö3ֿ¹(-G+Aֿ¹(Ans+I/Ans→I
:2H/√(Ans→C
:-B/(4A→A
.5√(-I-G+C→B
.5√(-I-G-C
:Disp "ROOTS ARE",A-C+B,A-C-B,A+C+Ans,A+C-Ans

Nevermind the ö, I was just running into an odd formatting error with the inverse token.

---

Z80 Assembly>English>TI-BASIC>Python>French>C>0

Re: Written Code

Myles_Zadok 15 Apr 2017 22:29

One thing I've been meaning to do is remove the ClrList L1. I originally stored the roots to a list, but I didn't like the way a list displayed complex roots, so I had it stored to regular variables, but forgot to remove the ClrList. I'll go ahead and do that while I'm thinking about it.

As for a quintic equation solver, I may create one, but I'm pretty sure the PLYSMITH app (I think that's what it is called) already has one.

Re: Written Code

Myles_Zadok 15 Apr 2017 23:03

Just did some research on Quintic Equation Solvers, and there's no formula like that for quadratics, cubics, and quartics. I don't think I'll create a program for quintics, since it doesn't sound like it is worth my time and effort.

Re: Written Code

Xeda Elnara 15 Apr 2017 23:13

Haha, nope! It's really cool that there are only formulas up to quartic.

---

Z80 Assembly>English>TI-BASIC>Python>French>C>0

Re: Written Code

Myles_Zadok 15 Apr 2017 23:30

I think it is somewhat ridiculous that if formulas for ordered polynomials of orders 2, 3, and 4 exist, then why don't 5 and higher exist? I guess it just shows that we can't know everything about Creation.

Re: Written Code

Xeda Elnara 15 Apr 2017 23:57

It was mathematically proven (to some surprise) by Evariste Galois using what is now known as Galois theory.

It makes sense in the way that we can find integer solutions for a+b=c, a^2+b^2=c^2, but there are no solutions for any higher powers. It's a property of numbers the way we defined them.

---

Z80 Assembly>English>TI-BASIC>Python>French>C>0

Setryyk (guest) 24 Apr 2017 22:19

where is the cuberoot and squareroot commands??

Trenly 24 Apr 2017 23:25

Square Root is [2nd] then $x^2$
Cube Root is [2nd] then 0 then 3 then scroll to the bottom. When the arrow points to Cube Root, press enter.

Last edited on 24 Apr 2017 23:26 by Trenly Show more

Re: Quartic Equation Solver

Xeda Elnara 25 Apr 2017 00:23

Is the cube root token also found at [math][4]? I don't have my calc on me.

---

Z80 Assembly>English>TI-BASIC>Python>French>C>0

Re: Quartic Equation Solver

Trenly 25 Apr 2017 02:03

Ive only ever used the catalog to enter it, but yes It is math+4