1/ program:từ khóa
Pi:tên(hằng)
Hinh_tron:tên
const:hằng
cv:tên(biến)
dt:tên(biến)
writeln:từ khóa(in câu r xuống hàng)
end:từ khóa.
2/
program dientichht;
uses crt;
var dl,dn,h,dt:real;
begin
clrscr;
write('Nhap day nho: ');
readln(dn);
write('Nhap day lon: ');
readln(dl);
write('Nhap chieu cao: ');
readln(h);
dt:=(a+b)/2*h;
write('Dien tich hinh thang do la: ',dt:2:2);
readln
end.
Cho mình ctlhn nhé
