Hello everyone. Is there any way to easily calculate all possible fractions of a number using ti nspire CAS?

For example, I enter number 100 and receive output 1, 2, 4, 5, 10, 20, 25, 50, 100. Thanks!

Here's a slightly more optimized version:

```
Input "NUMBER?", A
{1→L₁
For(B,2,A/2
if not(fPart(A/B
B→L₁(1+dim(L₁
End
L₁
```

Hope this helps ;) Oh, keep in mind, this does not return the last factor; that is, the number itself. If you use your example, when you set A to 100, L1 becomes {1, 2, 4, 5, 10, 20, 25, 50}. Just so you know

its easy to fix N not being appended to the list.

```
Input "NUMBER?", A
{1→L₁
For(B,2,A/2
if not(fPart(A/B
B→L₁(1+dim(L₁
End
A→L₁(1+dim(L₁
L₁
```

Edit: would seq( be able to be used at all? it seems like it could be, but I'm not sure it would output what we want it to

live the life because the life is good —vivir la vida, porque la vida es buena

Vie la vie que la vie est bonne quod est bonum vitae in vita

lebe das Leben, weil das Leben ist gut —vivere la vita, perché la vita è buona

Yeah it's pretty simple actually. Here's the code for it:

```
Input "Number?",A
int(A/2)->B
1->dim(L1)
For(C,1,B
If int(A/C)=A/C
Then
C->L1(dim(L1))
dim(L1)+1->dim(L1)
End
End
dim(L1)-1->dim(L1)
For(A,1,dim(L1
Disp L1(A)
End
L1
```

And yeah hope that helps, it'll find all the factors of any one number. Funny thing is that when I first went to make this program like a few minutes ago I apparently had already made a similar factoring program and had just left it in archive and forgot about it. It doesn't find the factors of one number but instead finds all the common factors of 2 numbers. Let me know if you want the code for that too. So yea, pretty cool stuff.

-HG

I cannot remember off the top of my head, but isn't there a factor() function built in?

47%? Take a look and try to imagine how cool 100% will be. This has won zContest 2011 and made news on TICalc. This compromise between Assembly and BASIC parses like BASIC and is fast like assembly. Grammer 2

Yes, it is, but it factors completely for example factor(100) you will get 2^2*5^2

Oh, okay. I must have remembered the factor() function from my TI-89 which I believe just made a list.

I can't remember if it's a built in library, but on mine I have a numtheory library with a function called *divisors*().

Goto Catalog (book symbol)

Press 6

Click on numtheory

scroll through the library functions

Alternatively, type **numtheory\divisors(100)**.

47%? Take a look and try to imagine how cool 100% will be. This has won zContest 2011 and made news on TICalc. This compromise between Assembly and BASIC parses like BASIC and is fast like assembly. Grammer 2