老师叫我们做的题,不会做,哪位高手会做?
pascal吧
全部回复
仅看楼主
level 2
1010: 判断三角形类型题目描述
输入三角形的三个边a,b,c(a,b,c均为整数,且a,b,c<=1000),判断它是何类型的三角形(等边三角形?等腰三角形?一般三角形?)。
如果不是三角形,则输出:“It is not a triangle.”
如果是等边三角形,则输出:“It is a equilateral triangle.”
如果是等腰三角形,则输出:“It is a isoceles triangle.”
如果是一般三角形,则输出:“It is a common triangle.”
输入
输入只有一行,为三条边a,b,c。输出
输出只有一行,对于输入的a,b,c,输出内容如题目。样例输入4 4 4样例输出It is a equilateral triangle. 求解!谢谢。
2014年01月25日 13点01分 1
level 12
手机,有点乱,见谅
2014年01月25日 14点01分 2
level 12
封号自己弄
var
a,b,c:integer
begin
2014年01月25日 14点01分 3
readln(a,b,c)
2014年01月25日 14点01分
level 12
if a=b=c then writeln('It is a equilateral triangle.') else
2014年01月25日 14点01分 4
是(a=b) and (a=c)
2014年01月26日 01点01分
回复 Fallen_Breath :额疏忽了
2014年01月26日 03点01分
level 12
if (a=b) or (b=c) or (c=a) then writeln(It is a isoceles triangle')
else writeln('It is a common triangle')
2014年01月25日 14点01分 5
level 12
end.
手机弄的,缩进,登高有点麻烦,见谅
2014年01月25日 14点01分 6
封号。。打错了
2014年01月25日 14点01分
level 12
其实我想问,元音音节前面不是an吗
2014年01月25日 14点01分 7
level 12
注意,else后面不加封号
2014年01月25日 14点01分 8
谢了
2014年01月25日 23点01分
level 13
开头再加上
if (a+b>=c) or (a+c>=b) or (b+c>=a) then
begin
writeln('It is not a triangle.');
halt;
end;
2014年01月26日 01点01分 11
level 2
怎么那么像我们老师出的题目。。
2014年01月28日 07点01分 13
1