Home primes: Difference between revisions
Content added Content deleted
m (→{{header|Phix}}: flipped personal tag) |
Not a robot (talk | contribs) (Add J) |
||
Line 90: | Line 90: | ||
HP20(15) = HP225(14) = HP3355(13) = HP51161(12) = HP114651(11) = HP3312739(10) = HP17194867(9) = HP194122073(8) = HP709273797(7) = HP39713717791(6) = HP113610337981(5) = HP733914786213(4) = HP3333723311815403(3) = HP131723655857429041(2) = HP772688237874641409(1) = 3318308475676071413 |
HP20(15) = HP225(14) = HP3355(13) = HP51161(12) = HP114651(11) = HP3312739(10) = HP17194867(9) = HP194122073(8) = HP709273797(7) = HP39713717791(6) = HP113610337981(5) = HP733914786213(4) = HP3333723311815403(3) = HP131723655857429041(2) = HP772688237874641409(1) = 3318308475676071413 |
||
</pre> |
</pre> |
||
=={{header|J}}== |
|||
<lang j>step =: -.&' '&.":@q: |
|||
hseq =: [,$:@step`(0&$)@.(1&p:) |
|||
fmtHP =: (' is prime',~":@])`('HP',":@],'(',":@[,')'&[)@.(*@[) |
|||
fmtlist =: [:;@}.[:,(<' = ')&,"0@(|.@i.@# fmtHP each [) |
|||
printHP =: 0 0&$@stdout@(fmtlist@hseq,(10{a.)&[) |
|||
printHP"0 [ 2}.i.21 |
|||
exit 0</lang> |
|||
{{out}} |
|||
<pre>2 is prime |
|||
3 is prime |
|||
HP4(2) = HP22(1) = 211 is prime |
|||
5 is prime |
|||
HP6(1) = 23 is prime |
|||
7 is prime |
|||
HP8(13) = HP222(12) = HP2337(11) = HP31941(10) = HP33371313(9) = HP311123771(8) = HP7149317941(7) = HP22931219729(6) = HP112084656339(5) = HP3347911118189(4) = HP11613496501723(3) = HP97130517917327(2) = HP531832651281459(1) = 3331113965338635107 is prime |
|||
HP9(2) = HP33(1) = 311 is prime |
|||
HP10(4) = HP25(3) = HP55(2) = HP511(1) = 773 is prime |
|||
11 is prime |
|||
HP12(1) = 223 is prime |
|||
13 is prime |
|||
HP14(5) = HP27(4) = HP333(3) = HP3337(2) = HP4771(1) = 13367 is prime |
|||
HP15(4) = HP35(3) = HP57(2) = HP319(1) = 1129 is prime |
|||
HP16(4) = HP2222(3) = HP211101(2) = HP3116397(1) = 31636373 is prime |
|||
17 is prime |
|||
HP18(1) = 233 is prime |
|||
19 is prime |
|||
HP20(15) = HP225(14) = HP3355(13) = HP51161(12) = HP114651(11) = HP3312739(10) = HP17194867(9) = HP194122073(8) = HP709273797(7) = HP39713717791(6) = HP113610337981(5) = HP733914786213(4) = HP3333723311815403(3) = HP131723655857429041(2) = HP772688237874641409(1) = 3318308475676071413 is prime</pre> |
|||
=={{header|Julia}}== |
=={{header|Julia}}== |