扫扫地
pascal吧
全部回复
仅看楼主
level 1
program tixing;
var a,b,h:integer;
var c:real;
begin
write('input tixing bianchang');
read(a,b,h);
c:=(a+b)*h/2;
writeln`('Let me think about');
writeln('trapezoid area is');
write(' ',c:3:3);
end.
2013年12月20日 08点12分 1
1