作业帮 > 综合 > 作业

1.编程(pascal):输入三角形的三个边,判断它是何类型的三角形(等边三角形?等腰三角形?一般三角形?)

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/22 09:13:52
1.编程(pascal):输入三角形的三个边,判断它是何类型的三角形(等边三角形?等腰三角形?一般三角形?)
以下程序在DELPHI下调试通过.
{$apptype console}
program exp;
var a,b,c:integer;
begin
  readln(a,b,c);
  if (a=b) and (b=c) then write('等边三角形')
  else if (a=b) or (a=c) or (b=c) then write('等腰三角形')
  else write('一般三角形')
end.