Special neighbor primes: Difference between revisions
Content added Content deleted
m (added whitespace, added a category (Prime Numbers).) |
m (→{{header|REXX}}: changed program title comment.) |
||
Line 200: | Line 200: | ||
=={{header|REXX}}== |
=={{header|REXX}}== |
||
<lang rexx>/*REXX |
<lang rexx>/*REXX pgm finds special neighbor primes: P1, P2, P1+P2-1 are prime, and P1 and P2<100*/ |
||
parse arg hi cols . /*obtain optional argument from the CL.*/ |
parse arg hi cols . /*obtain optional argument from the CL.*/ |
||
if hi=='' | hi=="," then hi= 100 /*Not specified? Then use the default.*/ |
if hi=='' | hi=="," then hi= 100 /*Not specified? Then use the default.*/ |