Strange plus numbers: Difference between revisions
Content added Content deleted
(Added Algol 68) |
|||
Line 47: | Line 47: | ||
# considers numbers n where 100 < n < 500 # |
# considers numbers n where 100 < n < 500 # |
||
PR read "primes.incl.a68" PR |
PR read "primes.incl.a68" PR |
||
[]BOOLprime = PRIMESIEVE 18; # note: PRIMESIEVE includes 0 in the sieve # |
[]BOOLprime = PRIMESIEVE 18; # note: PRIMESIEVE includes 0 in the sieve # |
||
INT s count := 0; |
INT s count := 0; |
||
FOR n FROM 101 TO 499 DO |
FOR n FROM 101 TO 499 DO |