Viết phương trình để tính diễn tích của một tam giác có độ dài 1 cạnh là b và chiều cao tường ứng Là h(b và h được nhập vào từ bàn phím,b và h là số tự nhiên)
program phuongt; uses crt; var b, h: integer; s: real; begin clrscr; write('Nhap do dai canh b = '); readln(b); write('Nhap chieu cao tuong ung h = '); readln(h); s:=b*h/2; write('Dien tich s = ', s); readln end.