Idoneal numbers: Difference between revisions
Content deleted Content added
→{{header|Action!}}: Simplification - don't need a loop to find c |
→{{header|Action!}}: Avoid unsigned comparison against -2... |
||
Line 29:
PROC Main()
CARD count, maxCount, n
BYTE idoneal
count = 0 maxCount = 65
n = 0
WHILE count < maxCount DO
n ==+ 1
idoneal = 1
a = 1
WHILE ( a + 2 ) <
b = a + 1
DO
|