A350378 Integer areas of integer-sided triangles such that the distance d between the incenter and the circumcenter is a prime number.
48, 768, 3840, 108000, 1134000, 200202240, 4382077920
Offset: 1
References
- Mohammad K. Azarian, Circumradius and Inradius, Problem S125, Math Horizons, Vol. 15, Issue 4, April 2008, p. 32.
- R. A. Johnson, Modern Geometry: An Elementary Treatise on the Geometry of the Triangle and the Circle. Boston, MA: Houghton Mifflin, 1929.
Links
- Mohammad K. Azarian, Solution of problem 125: Circumradius and Inradius, Math Horizons, Vol. 16, No. 2 (Nov. 2008), p. 32.
- Eric Weisstein's World of Mathematics, Exradius
- Eric Weisstein's World of Mathematics, Inradius
Programs
-
Mathematica
nn=520; lst={};Do[s=(a+b+c)/2;If[IntegerQ[s],area2=s (s-a)(s-b)(s-c); If[area2>0&&IntegerQ[Sqrt[area2]]&&PrimeQ[Sqrt[a*b*c/(4*Sqrt[area2])*(a*b*c/(4*Sqrt[area2])-2*Sqrt[area2]/s)]],Print[Sqrt[area2]," ",c," ",b," ",a," ",Sqrt[area2]/s," ",a*b*c/(4*Sqrt[area2])," ",Sqrt[a*b*c/(4*Sqrt[area2])*(a*b*c/(4*Sqrt[area2])-2*Sqrt[area2]/s)]]]],{a,nn},{b,a},{c,b}]
Comments