Viết câu lệnh rẽ nhánh kiểm tra xem 3 số dương nhập vào từ bàn phím có tạo thành một tam giác hay k
2 câu trả lời
progam ban_tu_chon;
uses crt;
var a,b,c :real;
BEGIN
clrscr;
write('nhap canh a thu nhat'); Read(a);
write('nhap canh b thu hai:'); Readln(b);
write('nhap canh c thu ba'); Readln(c);
if (a>=b+c) or (b>=c+a) or (c>=a+b) then write('ba canh tren khong phai cua mot tam giac')
else
if (a=b) or (b=c) or (c=a) then write('tam giac tren la tam giac can');
else
if a=b=c then write('tam giac tren la tam giac deu')
else
if (a*a=b*b+c*c) or (b*b=c*c+a*a) or (c*c=a*a+b*b) then write('tam giac tren la tam giac vuong');
readln;
END.
#chúc_bạn_học _tốt
#cho_mình_5_sao_nhé
Ba biến của 3 số dương là a,b,c
Ba số dương tạo thành một tam giác khi tổng của 2 số bất kì luôn lớn hơn số còn lại.
Câu lệnh:
if (a+b>c) and (a+c>b) and (b+c>a) then write('Co') else write('Khong');