Pythagorean triples: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: added another sample output for 1,000. -- ~~~~) |
m (→{{header|REXX}}: corrected the DO-END labels, they were in the wrong order. -- ~~~~) |
||
| Line 1,621: | Line 1,621: | ||
trips=trips+1 /*eureka. */ |
trips=trips+1 /*eureka. */ |
||
prims=prims+(gcd(a,b)==1) /*is this triple a primative ? */ |
prims=prims+(gcd(a,b)==1) /*is this triple a primative ? */ |
||
end /* |
end /*c*/ |
||
end /*b*/ |
end /*b*/ |
||
end /* |
end /*a*/ |
||
say 'max perimeter = 'N, /*show a single line of output. */ |
say 'max perimeter = 'N, /*show a single line of output. */ |
||