Giúp mình với nha!!! Hãy thực hiện quá trình giải toán trên máy tính cho bài toán sau: viết chương trình tính diện tích hình thang với đáy lớn, đáy nhỏ và chiều cao là các số thực được nhập từ bàn phím. lưu ý: công thức tính diện tích hình thang là( đáy lớn + đáy nhỏ ). chiều cao / 2.

2 câu trả lời

Program BTH;
Uses crt;
var dl,dn,s,cao:real;
Begin
        clrscr;
        Write('Nhap canh day lon: ');readln(dl);
        Write('Nhap canh day nho: ');readln(dn);
        Write('Nhap chieu cao: ');readln(cao);
        s:=(dl+dn)*cao/2;
        Writeln('Dien tich hinh thang la: ',s:4:2);
        readln;
end.

program tinhoc;

uses crt;

var a,b,h: real;

begin

     write('nhap a la:');

     readln(a);

     write('nhap b la:');

     readln(b);

     write('nhap h la:');

     readln(h);

     writeln('dien tich hinh thang =',(1/2)*h*(a+b):2:0)

     readln;

end.