Finding factors of a given number

We're glad you came by, but you might find what you're looking for elsewhere. TI-Basic Developer is not the site it once was. While its information on commands and other calculator features remains almost second-to-none, its forum, archives, and even hosting service, Wikidot, have been decaying for years. The calculator community would love to see what you're working on, or help you in your next coding adventure, but TI-Basic Developer is no longer the place to do it. Instead, you should head over to Cemetech (primarily American) or TI-Planet (primarily international). Both are active, well-established forums with their own archives, chatrooms, reference material, and abundant coding tools and resources. We'll see you there, we hope.

Forum Attachments

Finding factors of a given number

(account deleted) 27 Sep 2018 18:46

So, I created a program for my math homework, and what it does it shows factors of any given number >0, and I was proud when it worked for the first time. But a downside is that it takes FOREVER to calculate factors with input values >99. Here is what I came up with:

ClrList L₁
Repeat A
Input "Factors of ",A:End
ClrHome
Disp "Finding factors","of","0  % Complete...
Output(2,4,A
For(I,1,A
For(J,1,A
If A=JI:Then
1+dim(L₁→dim(L₁
J→L₁(Ans
End
If getKey:Then
A→I:Ans→J
{A→L₁
End:End
Output(3,1,int(100I/A
End
ClrHome
Disp "Factors of
Output(1,12,A
SortA(L₁:L₁

Is there a way to make this faster and smaller? Thanks for your help!

---

Hewwo, my name is Achak Claw. I was formerly BioHazard.

Re: Finding factors of a given number

Trenly 27 Sep 2018 19:33

Take a look at the factorization page