// 以上会输出Hello,因为方法ChangeS其实是创建了一个新的A,
// 而输出的还是原来的s,值并没有改变
var
s: string;
const
PI = 3.14;
function ChangeSVar(out A: string): string; //只加out 以上会输出World,
//out仅仅接受返回的值,对out的任何输入都会被忽略。同时out传递给过程的实际参数不必进行初始化,
begin
A := A + 'World';
end;
begin
//s := 'Hello '; 可不初始化
ChangeSVar(s);
writeln(s);
//PI := 5; // [dcc32 Error] T001.dpr(18): E2064 Left side cannot be assigned to
//char是个数据类型,char()
//这个格式是把一个别的数据类型强转成char类型,
//比如,char(97)和 char(#97)都将得到a。
writeln(char(#97)); //把字符转成 char
writeln(chr(12)); //把数字转成 char
writeln(chr(12));
// chr是个函数,参数是byte类型,
// 负责把ascii码值转换成char,比如:chr(97)返回一个char类型’a’;
readln;
end.