OFFSET
1,1
REFERENCES
A. H. Beiler, Recreations in the Theory of Numbers, Dover, New York, 1964, pp. 104-134.
LINKS
EXAMPLE
3*5 + 6*8 = 7*9
4*6 + 4*6 = 6*8
5*7 + 16*17 = 17*18
6*8 + 10*12 12*14
7*9 + 8*10 = 11*13
7*9 + 30*32 = 31*33
PROG
(True BASIC)
input k
for a = (abs(k)-k+4)/2 to 40
for b = a to (a^2+abs(k)*a+2)/2
let t = a*(a+k)+b*(b+k)
let c =int((-k+ (k^2+4*t)^.5)/2)
if c*(c+k)=t then print a; b; c,
next b
print
next a
end
CROSSREFS
KEYWORD
nonn
AUTHOR
Charlie Marion, Nov 15 2011
STATUS
approved
