Câu2: Viết chương trình tính diện tích của tam giác có ba cạnh là a,b,c ( được nhập từ bàn phím ) . nhập ba cạnh của tam giác vào ba biến a,b,c .nửa chu vi của tam giác p= ( a+b+c)/2 Diện tích của tam giác: s=√P( P-A) ( p-b) ( p-c)
1 câu trả lời
Program TAM_GIAC;
uses crt;
var a,b,c,p,S: real;
Begin
clrscr;
Write('Nhap canh a:');readln(a);
Write('Nhap canh b:');readln(b);
Write('Nhap canh c:');readln(c);
p:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
Write('Dien tich tam giac la:',s:10:2);
readln
end.