主题:三角形
wenjb
[专家分:0] 发布于 2008-10-04 18:38:00
输入三角形的三边,判断他是和类型的三角形(等边三角形?等腰三角形?一般三角形?)。
回复列表 (共1个回复)
沙发
小田甜 [专家分:3910] 发布于 2008-10-05 12:41:00
说明:里面全是拼音.
var a,b,c:real;
begin
readln(a,b,c);
if (a+b<=c) or (a+c<=b) or (b+c<=a) then write('BuShi')
else if (a=b) and (a=c) then write('DengBian')
else if (a=b) or (b=c) or (c=a) then write('DengYao');
if (abs(sqr(a)+sqr(b)-sqr(c))<(1E-5)*c) or
(abs(sqr(b)+sqr(c)-sqr(a))<(1E-5)*a) or
(abs(sqr(c)+sqr(a)-sqr(b))<(1E-5)*b)
then write('ZhiJiao');
write('SanJiaoXing');
readln;
end.
我来回复