%I#5 2012年3月30日18:57:45

%S 6,4,9,5,1,6,0,5,0,2,9,2,0,9,4,5,3,2,4,4,9，9,3,9,2,6,3,7,4,2,5,2,4，

%T 7,5,8,1,4,1,8,7,5,1,7,5A,9,9,5,3,5,10,7,56,6,3,8,8,5,2,9,8,4，

%U 5,4,9,7,1,6,2,6,9,8,8,7,3,3,6,7,7,6,2,9,4,8,0,8,6,3,4,5,0,6

%N边长（a，b，C）=（5,12,13）的直角三角形ABC中从CA侧到形心到CB侧的线段最短长度（C）的十进制展开。

%C有关定义和一般性讨论，请参见A195304。

%e（C）=6.49516050292094532449939526374275814。。。

%t a=5；b=12；h=2 a/3；k=b/3；

%tf[t]：=（t-a）^2+（t-a，^2）（（a*k-b*t）/（a*h-a*t））^2

%t s=N溶液[D[f[t]，t]==0，t，150]

%t f1=（f[t]）^（1/2）/。第[s，4]部分

%t实际数字[%，10，100]（*（A）A195412*）

%t f[t]：=（t-a）^2+（（t-a）^2）（k/（h-t））^2

%t s=N溶液[D[f[t]，t]==0，t，150]

%t f2=（f[t]）^（1/2）/。第[s，4]部分

%t实际数字[%，10，100]（*（B）A195413*）

%tf[t]：=（b*t/a）^2+（（b*t/a）^2）（（a*h-a*t）/（b*t-a*k））^2

%t s=N溶液[D[f[t]，t]==0，t，150]

%t f3=（f[t]）^（1/2）/。第[s，1]部分

%t实际数字[%，10，100]（*（C）A195414*）

%t c=平方[a^2+b^2]；（f1+f2+f3）/（a+b+c）

%t实际数字[%，10，100]（*Philo（ABC，G）A195424*）

%Y参考A195304。

%K nonn，cons公司

%O 1，1

%A_Clark Kimberling_，2011年9月18日