Viết chương trình xét một tam giác có là tam giác vuông hay không khi biết 3 cạnh của tam giác

718

Tailieumoi.vn biên soạn và giới thiệu bộ câu hỏi Tin học gồm các kiến thức lý thuyết và thực hành, giúp học sinh ôn tập và bổ sung kiến thức cũng như hoàn thành tốt các bài kiểm tra môn Tin học. Mời các bạn đón xem:

Top 1000 câu hỏi thường gặp môn Tin học (Phần 4)

Câu 42: Viết chương trình xét một tam giác có là tam giác vuông hay không khi biết 3 cạnh của tam giác

Lời giải:

Program BT;
Uses crt;
Var a, b, c: real;

Begin
        Clrscr;
        Write('Nhap do dai 3 canh: '); Readln(a, b, c);
        If (a + b <= c) or (a + c <= b) or (b + c <= a) then Write('Khong phai do dai 3 canh tam giac')
        Else
        If(a * a + b * b = c * c) or (b * b + a * a = c * c) or (b * b + c * c = a * a) then Write('Tam giac vuong')
        Else Write('Khong phai tam giac vuong');
        Readln
End.

Đánh giá

0

0 đánh giá