cho tam giác ABC với độ cao h và độ dài cạnh đáy là a. Viết chương trình nhập vào độ cao h và cạnh đáy a, rồi tính và đưa ra màn hình diện tích của tam giác đó
1 câu trả lời
Uses crt;
Var a,h,s: extended;
Begin
Clrscr;
Write('Nhap chieu cao: '); Readln(h);
Write('Nhap canh day: '); Readln(a);
s:=(a*h)/2;
Write('Dien tich tam giac do la: ',s:0:2);
Readln
End.