关于pascal的函数问题

Question

现在学到函数，觉得有点困难，什么叫返回其结果制。函数和过程有什么区别？求一个易懂的教程。

Answer 1

上面那位，你理解错了‘函数’的意思了。
搂主，听着：
为了解决复杂问题，我们常常将一个较大的程序分为若干个相对独立的程序模块，每个程序模块用来实现一个特定的功能。这样的程序块，称为子程序。整个程序是通过一个主程序作为线索并调用若干个子程序来解决问题。下图为主程序调用子程序的关系图，我们应注意到当完成某子程序调用后，总是返回到调用点的下一个语句继续执行。在PASCAL中，子程序有两种形式：函数和过程。
自定义的函数必须放在它的主程序的说明部分。调用自定义函数就象调用标准函数一样。函数最终返回一个值，故函数可看成一个数据，并放入表达式中。
过程：说明部分又可以包括常量说明、变量说明、类型说明、还可以包括其它函数和过程说明。过程也可以没有说明。说明部分定义的变量称为局部变量，在过程结束并返回调用它的上一级程序后，这些局部变量将被全部释放，对主程序不产生任何影响。

Answer 2

一、数学函数：

Inc(i) 使I:=I+1;
Inc(I,b) 使I:=I+b;
Abs(x) 求x的绝对值 例：abs(-3)=3
Chr(x) 求编号x对应的字符。例：Chr(65)=’A’ chr(97)=’a’ chr(48)=’0’
Ord(x) 求字符x对应的编号。例:ord(‘A’)=65 ord(‘a’)=97 另外：ord(false)=0 ord(true)=1
Sqr(x) 求x的平方。 例：sqr(4)=16
Sqrt(x)求x的开方. 例：sqrt(16)=4
round(x) 求x的四舍五入 例：round(4.5)=5
trunc(x) 求x的整数部分 例：trunc(5.6)=5 结果是integer型
int(x) 求x的整数部分 例int(5.6)=5.0 结果是real型
frac (x)求x的小数部分 例 frac(5.6)=0.6
pred(x) 求x的前导 pred(‘b’)=’a’ pred(5)=4 pred(true)=false
succ(x) 求x的后继 succ(‘b’)=’c’ succ(5)=6 succ(false)=true
odd(x) 判断x是否为奇数。如果是值为true，反之值为false. Odd(2)=false odd(5)=true
power(a,n) 求a的n次方 power(2,3)=8
random 取0~1之间的随机数（不能取到1）
randomize 随机数的种子函数,在每次设置随机数时都要把这个函数放在最前面.
Fillchar(a,size(a),0) 数组初始化，即把数组a的值全部置为0
SHR: x SHR n 把x换成二进制后向右移n位，相当于 把x 除以 2n
SHL: x SHL n把x换成二进制后向左移n位，相当于 把x 乘以 2n

二、字符串函数
1. 连接运算 concat(s1,s2,s3…sn) 相当于s1+s2+s3+…+sn.
例：concat(‘11’,’aa’)=’11aa’;
2. 求子串。 Copy(s,I,L) 从字符串s中截取第I个字符开始后的长度为l的子串。
例:copy(‘abdag’,2,3)=’bda’
3. 删除子串。过程 Delete(s,I,l) 从字符串s中删除第I个字符开始后的长度为l的子串。
例：s:=’abcde’;delete(s,2,3);结果s:=’ae’
4. 插入子串。 过程Insert(s1,s2,I) 把s1插入到s2的第I个位置
例：s:=abc;insert(‘12’,s,2);结果s:=’a12bc’
5. 求字符串长度 length(s) 例：length(‘12abc’)=5
6. 搜索子串的位置 pos(s1,s2) 如果s1是s2的子串 ，则返回s1的第一个字符在s2中的位置，若不是子串，则返回0.
例：pos(‘ab’,’12abcd’)=3
7. 字符的大写转换。Upcase(ch) 求字符ch的大写体。
例：upcase(‘a’)=’A’
8. 数值转换为数串。 过程 Str(x,s) 把数值x化为数串s.
例：str(12345,s); 结果s=’12345’
9. 数串转换为数值。 过程val(s,x,I) 把数串s转化为数值x,如果成功则i=0,不成功则I为无效字符的序数
例：val(‘1234’,x,I);结果 x:=1234

Answer 3

返回其结果制就是把函数最后得到的值返回给调用它的程序。
函数一定返回给调用它的程序一个值，而过程不返回值给调用它的程序。过程更像一个子程序。