进来看看

Question

不行，倒不如用procedure子程序。

Answer 1

function　ss(var hh):boolean;
在传入的参数前加一个var，这个参数就可以传回了，
如上面的hh，在函数中改了hh的值，hh的值就回传回去。

Answer 2

fuction(var parm1:intger,var parm2 :string):boolean
这样不可以马吗

Answer 3

fuction(var parm1:intger,var parm2 :string):boolean
这样不可以马吗这是使用了两个参数，但不是返回两个值。比如说，有4个数要求最大和第二大的数，用一个函数调用，入口参数4个，出口参数是2个，怎么办？

Answer 4

关于你的问题
fuction  getnum(parm1,parm2,parm3,parm4:intger,var outm1,outm2 :integer):boolean;
begin
//在这里判断后，如parm最大，parm2第二个大就让outm1:=parm1
outm1:=parm1;
outm2:=parm2;
end;
这样定义调用时定义两个变量
var
a,b:integer;
begin
getnum(4,3,2,1,a,b);
//a反回了4，了反回3,
end;这下明白了吧