已知某梯形的上底A=13，下底B=18，高H=9，求它的面积S
參考答案:function area():integer;
var
a,b,h,s:integer;
begin
a:=13;
b:=18;
h:=9;
s:=(a+b)*h/2;//没有余数，是整数除法,可以考虑换成浮点型
result:=s;
end;
我使用delphi的方法的，不过delphi用的是pascal语法。
我认为pascal还是比较好学的，我一开始学的是c语言，然后学了数据结构，操作系统，c++,delphi,c#,...一步一步的来吧。祝你成功。
