Viết chương trình tính diện tích S của hình thang có độ dài hai đáy là a và b,chiều cao h,được nhập từ bàn phím nhờ mn giúp em ạ :>

1 câu trả lời

uses crt;

var a,b,h:real;

begin

clrscr;

   write(‘nhap day nho:=’);readln(a);

   write(‘nhap day lon:=’);readln(b);

   write(‘nhap chieu cao:=’);readln(h);

   writeln(‘dien tich hinh thang S:=’,(1/2)*(a+b)*h);

readln

end.