Hãy viết phần khai báo cho chương trình tính diện tích S của hình tam giác với độ dài một cạnh a và chiều cao tương ứng h (a và h là các số nguyên được nhập từ bàn phím).
Hãy viết phần khai báo cho chương trình tính diện tích S của hình tam giác với độ dài một cạnh a và chiều cao tương ứng h (a và h là các số nguyên được nhập từ bàn phím).
var S: real;
a, h: integer;
Program dien_tich_tamgiac;
uses crt;
var a,h: real;
begin
clrscr;
write(‘nhap a=’); readln(a);
write(‘nhap h=’); readln(h);
writeln(‘dien tich tam giac =’ ,1/2*a*h:4:2);
readln;
end.