一、在编程时我们可以通过多次函数调用完成计算，并送回结果。
如下：x:=24;y:=25;w:=sqrt(y)+6.5;q:=sqrt(x+y).这段程序段包括对于标准函数sqrt的两次调用。

二、Pascal中提供的标准函数是有限的。有时候，为了运算的方便，我们要自定义函数。下面是一个带有函数的程序。计算下面三个圆的面积。

program pwjx;
var
  r,sum，t:real;
  i:integer;
function yuan(r:real):real;{yuan为函数名，f为形式参数，}
  const                     {常量说明}  
    pi=3.1415926;
  var                       {变量说明}
    s:real;
begin
   s:=pi*r*r;
   yuan:=s;  {给函数赋值}
end;

begin
  sum:=0;
  for i:=1 to 3 do
  begin
     read(r);
    t:=yuan(r);
     sum:=sum+t;{r为实际参数}
  end;
 writeln(sum);
end.

三、分析自定义函数说明：
function 函数名  （形式参数表）：函数类型；{函数的首部}

说明部分  {函数体}
begin
执行语句；
……
end;　

四、函数的调用形式

五、自定义函数编程

例： 任意输入10组三角形的三边，求其面积。

已知三角形的三边，是可以求出面积的。我们可以定义一个已知三角形三边求其面积的函数，设为AREA（a1,a2,a3）。