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