program ct;
uses crt;
var a,b,c:integer;
begin
clrscr;
write('nhap day lon:');readln(a);
write('nhap day nho:');readln(b);
write('nhap chieu cao:');readln(c);
writeln('tong hai canh day la',a+b);
writeln('tich hai canh day nhan chieu cao',(a+b)*c);
writeln('dien tich hinh thang la:',(a+b)*c/2:4:2);
readln
end.