想要编写一个Pascal程序,三条直线段的长度是整数.用着三条直线段是否能构成一个三角形?分可以、可以构成直角三角形、不可以的三种情况讨论.

来源：学生作业帮助网编辑：作业帮时间：2024/05/09 05:00:35

想要编写一个Pascal程序,三条直线段的长度是整数.用着三条直线段是否能构成一个三角形?分可以、可以构成直角三角形、不可以的三种情况讨论.
想要编写一个Pascal程序,
三条直线段的长度是整数.用着三条直线段是否能构成一个三角形?分可以、可以构成直角三角形、不可以的三种情况讨论.

想要编写一个Pascal程序,三条直线段的长度是整数.用着三条直线段是否能构成一个三角形?分可以、可以构成直角三角形、不可以的三种情况讨论.
program a4;
var a,b,c:integer;
begin
readln(a,b,c);
if (((a>0) and (b>0) and (c>0))and((a+b>c) and (a+c>b) and (b+c>a))) then
if (a*a+b*b=c*c)or(a*a+c*c=b*b)or(b*b+c*c=a*a)
then writeln('can form a right triangle')
else writeln('can form a triangle')
else writeln('can not form a triange');
readln;
end.

想要编写一个Pascal程序,三条直线段的长度是整数.用着三条直线段是否能构成一个三角形?分可以、可以构成直角三角形、不可以的三种情况讨论. 用 Pascal 编写一个程序将十进制整数n转换为二进制数.用 Pascal 编写加说明 PASCAL程序全1数字全1 数字请用PASCAL编写,输入一个奇数P(P pascal程序怎样随机产生一个三位数?并解释为什么要这样编写? 用PASCAL语言编写一个求1+2+3+...+N的程序 pascal金字塔编写一个程序,输入两个整数N和K（N,K pascal编写一个竞赛评分程序.10个选手,个评委对每个人打分,分数规则是去掉一个最高分,去掉一个最低分, 编写pascal语言程序,输入一个三位数的自然数,然后把这个数的百位数与个位数对调,输出对调后的数. 用PASCAL语言编写程序,输入一个实数,输出改实数和它的平方,平方根三次方,三次方根答得好我会加分的用pascal编写程序输入十个整数,统计大于0的数的个数.用pascal编写程序输入十个整数,统计大于0的数的个数. 用pascal编写程序如果一个4位数等于它的每一位数字4次方之和,则称为玫瑰花数,求所有的玫瑰花数.用pascal编写程序如果一个4位数等于它的每一位数字4次方之和,则称为玫瑰花数,求所有的玫瑰用pascal输出语句编写下列图形程序 1 121 12321 12343211121123211234321 求一个背包程序（PASCAL）最原始的产生数pascal程序给出一个整数n(n Miller-Rabbin素数测试法求一个用Miller-Rabbin算法判断是否为素数的程序,注意要用PascalPascal!Pascal!Pascal!Pascal!Pascal!Pascal!Pascal!Pascal!最好有说明求pascal贪心题目：线段覆盖——程序；请按照以下思路编写程序：首先说一下,我第一次见到这道题是在百度noip贴吧的一位吧友共享的《基本程序题集》中.在该吧友给出的题解中这样写到：编写一个程序,求回文数. 编写程序：有一个函数:x,(x