Carmichael 3 strong pseudoprimes: Difference between revisions
Content added Content deleted
m (Added the Sidef language) |
m (→{{header|REXX}}: elided an extra comment that was left over from an edit.) |
||
Line 1,044: | Line 1,044: | ||
carms=carms+1; @.q=r /*bump Carmichael #; add to array*/ |
carms=carms+1; @.q=r /*bump Carmichael #; add to array*/ |
||
if bot==0 then bot=q; bot=min(bot,q); top=max(top,q) |
if bot==0 then bot=q; bot=min(bot,q); top=max(top,q) |
||
/*find the maximum. */ |
|||
end /*d*/ /* [↑] find minimum and maximum.*/ |
end /*d*/ /* [↑] find minimum and maximum.*/ |
||
end /*h3*/ |
end /*h3*/ |
||
Line 1,066: | Line 1,065: | ||
end /*i*/ |
end /*i*/ |
||
!.x=1; return 1</lang> |
!.x=1; return 1</lang> |
||
'''output''' when using the default input: |
'''output''' when using the default input: |
||
<pre style="height:50ex"> |
<pre style="height:50ex"> |
||
──────── a Carmichael number: 3 ∙ 11 ∙ 17 |
──────── a Carmichael number: 3 ∙ 11 ∙ 17 |