Question

Viết chương trình nhập vào độ dài 3 cạnh của tam giác sau đó kiểm tra lại 3 cạnh của tam giác xem nó là tam giác vuông nào

Answer 1

Program HOC24;

var a,b,c: integer;

begin

write('Nhap canh thu nhat AB: '); readln(a);

write('Nhap canh thu hai BC: '); readln(b);

write('Nhap canh thu ba CA: '); readln(c);

if a*a+c*c=b*b then write('Tam giac vuong tai A');

if a*a+b*b=c*c then write('Tam giac vuong tai B');

if b*b+c*c=a*a then write('Tam giac vuong tai C');

readln

end.