Question

viết chương trình tính diện tích và chu vi hình tam giác với độ dài một cạnh và chiều cao tương ứng được nhập từ bàn phím

Answer 1

lol

Answer 2

uses crt;

var a,h,cv:integer;

dt:real;

begin

clrscr;

write('nhap canh thu 1:'); readln(a);

write('nhap chieu cao:'); readln(h);

cv:=a+h;

dt:=(a*h)/2

writeln('chu vi tam giac la: ',cv);

writeln('dien tich tam giac la: ',dt:4:2);

readln;

end.

Answer 3

Answer 4

uses crt;

var a,h,cv:integer;

dt:real;

begin

clrscr;

write('nhap canh thu 1:'); readln(a);

write('nhap chieu cao:'); readln(h);

cv:=a+h;

dt:=(a*h)/2

writeln('chu vi tam giac la: ',cv);

writeln('dien tich tam giac la: ',dt:4:2);

readln;

end.