Viết chương trình hoàn chỉnh tính diện tích hình tam giác có đường cao và cạnh đáy

program TinhDienTichTamGiac;
var
  ChieuCao, DoDaiDay, DienTich: real;
begin
  writeln('Nhập chiều cao của tam giác: ');
  readln(ChieuCao);
  
  writeln('Nhập độ dài cạnh đáy của tam giác: ');
  readln(DoDaiDay);
  
  DienTich := 0.5 * ChieuCao * DoDaiDay;
  
  writeln('Diện tích của tam giác là: ', DienTich:0:2);
end.

chi tiết: Trong chương trình này, chúng ta sử dụng hai biến ChieuCao và DoDaiDay để lưu giá trị chiều cao và độ dài cạnh đáy của tam giác. Sau đó, chúng ta sử dụng công thức tính diện tích tam giác: DienTich = 0.5 * ChieuCao * DoDaiDay. Cuối cùng, chúng ta in ra giá trị diện tích đã tính được với độ chính xác 2 chữ số thập phân.