(12C) Simple prime factorization

[Schraf]

Enter a number and then R/S.

Example : 10556 R/S
2
R/S
2
R/S
7
R/S
13
R/S
29
R/S
0

10556 = 2 x 2 x 7 x 13 x 29

You can immediately start over with a new number.

Code:

01   STO 0
02   f Σ
03   2
04   STO + 1
05   RCL 0
06   RCL 1
07   ÷
08   ENTER
09   FRAC
10   x = 0
11   GTO 14
12   1
13   GTO 04
14   x⇌y
15   STO 0
16   RCL 1
17   R/S
18   x ≤ y
19   GTO 05
20   0
21   GTO 00