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))

0 bình luận về “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))”

1. 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.

   Bình luận

2. 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.

   Bình luận