Viết chương trình tính diện tích tam giác Không sử dụng công thức s= căn( p(p-a)(p-b)(p-c))

2 câu trả lời

mình sử dụng CT : $S=a.b.sin(x)$ trong đó $x$ là góc kẹp giữa $2$ cạnh $a$ và $b$ nha.

nếu như không thì bạn sử dụng CT $S=a.h$ như bạn trên cũng được

Program Hotboy;

uses crt;

var s,b,x: real;

begin

write('nhao do dai canh thu nhat'); readln(a);

write('nhap do dai canh thu hai'); readln(b);

write('nhao so do goc kep giua hai canh'); readln(x);

s:=a*b*sin(x)/2;

write('dien tich cua tam giac do la',s);

readln

end.

program abc;

uses crt;

var a;b;c;d: real;

begin

writeln('nhap canh so 1: ');     readln(a);

writeln('nhap chieu cao tuong ung ');     readln(c);

d:= a*c/2;

wwriteln('vay dien tich tam giac la: ',d);

readln;

end.

Câu hỏi trong lớp Xem thêm