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

Vietjack.me giới thiệu bộ câu hỏi ôn tập Tin học có đáp án được biên soạn bám sát chương trình học giúp bạn ôn luyện và bổ sung kiến thức môn Tin học tốt hơn. Mời các bạn đón xem:

1 252 03/08/2023


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

Đề bài: 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.

1 252 03/08/2023


Xem thêm các chương trình khác: