信息学竞赛Pascal语言:函数和过程(六)(2)
函数
1.函数的定义
function函数名(形参表):函数类型;{————函数首部}
var{————局部变量说明部分}
begin{————函数体}
...{————函数语句}
...
函数名:=表达式
end;
2.函数的调用:
函数在语法上相当于一个表达式,所以,调用时,函数不能独立成为一个语句;它可以出现在任何表达式可以出现的地方。
例如赋值语句的右边:
X:=函数名(实在参数表);{————X的类型与函数类型必须一致}
又,如果函数类型是boolean,则还可以出现在条件语句中,充当条件表达式:
if函数名(实在参数表)then……
例3:编一程序,求从10名同学中选出3名代表,有几种不同的选法。
(公式:C(m,n)=m!/n!*(m-n)!从m中选n)
programzohe1;
varm,n:integer;
c:longint;
functionfactor(x:integer):longint;{定义}
vari:integer;
p:longint;
begin
p:=1;
fori:=1toxdop:=p*i;
factor:=p;{这个语句必须}
end;
begin
write('m,n=');readln(m,n);
c:=factor(m)div(factor(n)*factor(m-n));{调用}
writeln('c(',m,',',n,')=',c);
end.
下一页阅读:全局变量和局部变量
