常州中小学编程培训，Pascal培训，暑期编程招生

1、自定义函数
自定义函数的定义在程序说明部分，自定义函数调用在程序执行部分；
函数格式：
function 函数名:函数类型; {函数首部}

Begin

...

函数名 := 表达式;
End;

2、自定义过程
自定义函数通常被设计成求一个函数值，一个函数只能得到一个运算结果。若要设计成能得到若干个运算结果,或完成一系列处理,就需要自定义“过程”来实现。
Procedure 过程名 (形式参数表); ｛过程首部｝
局部变量说明部分；
begin
语句部分; ｛过程体部分｝
end;

例题：
1、求N的阶乘
program pro01;
function fac(n:longint):longint;
var k,t:longint;
begin
t := 1;
for k := 1 to n do t := t * k;
fac := t;
end;

var s:longint;

begin
s := fac(5);
writeln(s);
readln;
end.

报名地址：1.常州天宁区延陵西路2号工人文化宫5号楼（文化宫电影院后面）
2.新北区太湖东路9-4号常州创意园E栋12楼（常州创意软件园）