A057100 Hypotenuses of Pythagorean triangles (ordered by the product of the sides).
5, 10, 13, 15, 17, 20, 25, 26, 25, 29, 30, 41, 37, 34, 35, 39, 40, 50, 61, 45, 52, 51, 50, 65, 53, 55, 85, 58, 65, 60, 75, 82, 65, 74, 68, 65, 70, 78, 113, 73, 101, 75, 85, 80, 85, 91, 100, 89, 85, 122, 87, 90, 145, 123, 104, 95, 111, 102, 97, 100, 145, 130, 125, 106
Offset: 1
Keywords
Examples
a(1)=5 since 3*4*5=60 is smallest possible positive product
Programs
-
Mathematica
maxShortLeg = 66; terms = 64; r[a_] := {a, b, c} /. {ToRules[Reduce[a <= b < c && a^2+b^2 == c^2, {b, c}, Integers]]}; abc = r /@ Complement[Range[maxShortLeg], {1, 2, 4}] // Flatten[#, 1]&; SortBy[abc, Times @@ # &][[;; terms, 3]] (* Jean-François Alcover, Nov 21 2019 *)