Find adjacent primes which differ by a square integer: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|Raku}}: re-enable caveat) |
(→{{header|ALGOL 68}}: D'oh!) |
||
Line 18: | Line 18: | ||
FOR i TO UPB is square DO is square[ i ] := FALSE OD; |
FOR i TO UPB is square DO is square[ i ] := FALSE OD; |
||
FOR i WHILE INT i2 = i * i; |
FOR i WHILE INT i2 = i * i; |
||
i2 <= UPB is square |
|||
DO |
DO |
||
is square[ i2 ] := TRUE |
is square[ i2 ] := TRUE |