This program is very short at only 11 lines and completely factors any number given to it and is displayed in a list. 1→O ClrList L1 Input "NUM:",A For(B,2,A,1) While remainder(A,B)=0 B→L1(O) 1+O→O A/B→A End End Disp L1
| Graph IRI | Count |
|---|---|
| http://dbkwik.webdatacommons.org | 4 |