Viết chương trình nhập vào 1 cạnh huyền và chiều cao tương ứng của 1 hình tam giác vuông . Tính diện tích hình tam giác vuông. Giúp mk vs ạ dg rất cần ạ
Program dien_tich_tam_giac_vuong;
Uses crt;
Var a, h, S : real;
Begin
Write('Hay nhap gia tri cua a='); Readln(a);
Write('Hay nhap gia tri cua h='); Readln(h);
S:=a.h/2;
Write('Dien tich tam giac vuong la:',S);
Readln
End.