%I#9 2012年11月21日14:34:17

%S 5,10,13,15,15,17,17,20,20,21,21,25,25,26,26,28,29,30，

%电话：30,30,30:30,34,34,35,35,36,37,37,36,39,39,39，39,40,40,40，

%U 40、41、41、41,41、42、42、44、44、45、45、45,45、48、50、50、50,50、51、51、51,51

%N按递增c和b排序的不等边整数Heronian三角形的最大边c。

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/HeronianTriangle.html“>希罗尼亚三角</a>

%t侧最大值=60；r[c]：=收获[Do[p=（a+b+c）/2；red=减少[area>1&a<b<c&&面积^2==p*（p-a）*（p-b）*（p-c），面积，整数]；如果[red=！=False，sol={a，b，c，area}/.{ToRules[red]}；母猪[sol]]，{b，1，c-1}，{a，c-b，b-1}]]；三角形=扁平[Reap[Do[rc=r[c]；如果[rc[[2]]=！={}，母猪[rc[[2，1]]]，{c，5，sideMax}]][[2]，1]]，2]；排序[三角形，其中[#1[[3]]<#2[[3]]，True，#1[[3]]>#2[[3]]，False，#1[[2]]<#2]，True

%Y参见A046128、A046129、A046131。

%K nonn公司

%0、1

%A _瑞克·W·魏斯坦_