function add1(a:Integer):Integer; //一个参数begin add1:=a+a; end; function add2( a,b:Integer):Integer; //两 ...
www.pediy.com