WP 34S Prime power test programme

06042014, 09:36 AM
(This post was last modified: 06042014 09:37 AM by Gerald H.)
Post: #1




WP 34S Prime power test programme
The programme tests whether an input positive integer is prime or the power of a prime. If input is composite "0" is returned, if not the prime of which the input is an integral power.
1 LBL 'PPT' 2 STO 07 3 SIGN 4 STO 06 5 RCL 07 6 STO 08 7 SIGN 8 STO+ 06 9 RCL 06 10 RCL 07 11 ENTER 12 BASE 10 13 ^MOD 14 DECM 15 RCL 06 16 RCL 07 17 GCD 18 STO 07 19 DEC X 20 x=0? 21 RTN 22 RCL 07 23 PRIME? 24 SKIP 001 25 BACK 020 26 RCL 08 27 ENTER 28 R↓ 29 RCL/ Y 30 1 31 x<? Y 32 BACK 004 33 x≠? Y 34 CLx 35 RCL* Z 36 END 

« Next Oldest  Next Newest »

User(s) browsing this thread: 1 Guest(s)