The conjecture is: If you take any number and write it out in word form (ex. thirty or eighty-six), and take the number of letters in it, then write that number out, then take the number of letters in that one…etc…you will always end up at four. Try it.

I want to write a program that will do this for me. Can anyone help me?

I can't figure out how to count the number of letters in a word.

Thanks in advance.

I know there was this program contest which is that idea but you could probably simplify it as you don't need to write the numbers out: http://tibasicdev.wikidot.com/challenges#toc4

it's challenge 5

I recommend the use of strings, I'm doing homework right now so I can't help right now

*The Silver Phantom welcomes you*

If you put in a word, how do you count the number of letters in it?

You have two ways, depending on what you mean. In your case, use length(.

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

I made a program today but it may not be exactly what you mean. This one doesn't actually display each word and the length, but it does do the whole numbers in the word thing:

```
:{6,6,5,5,5,7,6,6,10→L₂
:{0,3,3,5,4,4,3,5,5,4→L₁
:augment(Ans,{3,6,6,8,8,7,7,9,8,8
:For(A,1,9
:augment(Ans,L₁+L₂(A
:End
:ΔList(cumSum(Ans₁→L₁ //L₁ is now a list of the number of letters in the word-version of that element of the list. For example, the L₁(89)="eighty nine" = 10 letters. L₁(89) is 10. Contains 1-109
:Repeat 0
:randInt(1,109
:Pause Ans
:Repeat Ans=4
:L₁(Ans
:Disp Ans
:End
:Pause
:End
```

Tada! It's a bit minimal, to say the least, but it gets the job done. You could also replace the randInt( with a for loop to go through each number

That's really clever! Good job :)

Aw thanks! :D