KHÁM PHÁ Học Toán + Tiếng Anh theo Sách Giáo Khoa cùng học online và gia sư dạy kèm tại nhà từ lớp 1 đến lớp 12 với giá cực kỳ ưu đãi kèm quà tặng độc quyền"CỰC HOT".
Bài 1: Viết biểu thức tồn tại tam giác (a, b, c là 3 cạnh của tam giác)
By Nevaeh
Bài 1: Viết biểu thức tồn tại tam giác (a, b, c là 3 cạnh của tam giác)
Program Tamgiac; Uses crt; Var a, b, c: real;
Begin Clrscr; Write(‘Nhap do dai 3 canh: ‘); Readln(a, b, c);
If (a + b > c) and (b + c > a) and (a + c > b) and (a > 0) and (b > 0) and (c > 0) then Write(‘Ton tai tam giac’) Else Write(‘Khong ton tai tam giac’);
uses crt; var a,b,c:real; BEGIN clrscr; write(‘Nhap canh thu nhat:’); readln(a); write(‘Nhap canh thu hai:’); readln(b); write(‘Nhap canh thu ba:’); readln(c); if (a+b>c) and (b+c>a) and (a+c>b) then write(‘Do dai 3 canh HOP LE’) else write(‘Do dai 3 canh KHONG HOP LE’); readln END.
Program Tamgiac;
Uses crt;
Var a, b, c: real;
Begin
Clrscr;
Write(‘Nhap do dai 3 canh: ‘); Readln(a, b, c);
If (a + b > c) and (b + c > a) and (a + c > b) and (a > 0) and (b > 0) and (c > 0) then Write(‘Ton tai tam giac’)
Else Write(‘Khong ton tai tam giac’);
Readln
End.
uses crt;
var a,b,c:real;
BEGIN
clrscr;
write(‘Nhap canh thu nhat:’); readln(a);
write(‘Nhap canh thu hai:’); readln(b);
write(‘Nhap canh thu ba:’); readln(c);
if (a+b>c) and (b+c>a) and (a+c>b) then
write(‘Do dai 3 canh HOP LE’)
else write(‘Do dai 3 canh KHONG HOP LE’);
readln
END.
Chúc bạn học tốt.
Cho mình câu trl hay nhất nha.