a) Viết chương trình tính diện tíc hình thang với a độ dài đáy lớn, b là độ dày đáy bé, h là chiều cao tương ứng ( với a,b,h là các số nguyên được nhập từ bàn phím). b) Tính diện tích hình thang với a=5cm, b=3cm, h=2cm

$a.$

Program Dien_tich_hinh_thang;

Uses Crt;

Var a, b, h: integer;

       S       : real;

Begin

           clrscr;

           Write('Canh_lon_la ='); realn(a);

           Write('Canh_nho_la ='); realn(b);

           Write('Chieu_cao_la'); realn(h);

                    S:=(a + b)*c/2;

           Writeln('Dien_tich_hinh_thang_la' : S);

           Realn;

           End.

$b.$ Diện tích hình thang là:

Theo công thức: $\dfrac{(a + b). h}{2}$ 

$\rightarrow$ $\dfrac{( 5 + 3) . 2}{2}= 8$ ( cm )

Vậy diện tích hình thang là $8$ $cm$

$@HannLyy$