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.

Câu hỏi trong lớp Xem thêm