pascal ascall 码

输入部分：

多组数据，一行一个字母

输出部分：

对于每组输入，输出与之对应的ASCII码

输入样例：

a

输出样例：

97

var a:char;

begin

readln(a);

writeln(ord(a));

readln;

end.

var

c:char;

begin

while not eof do {适用于读入多组数据的}

begin

readln(c);

writeln(ord(c)); {输出对应的ASCLL码}

end;

end.

或者还有就是

var

a:char;

begin

read(a);

writeln(ord(a));

readln;

end.

var a:char;

begin

readln(a);

writeln(ord(a));

readln;

end.

Program ascll

Var

a:char; b:longint;

Begin

readln(a,b); //读入a，b，a为字符，b为一个ASCLL码；

writeln(chr(a)); //输出与输入的ASCLL码对应的字符；

writeln(ord(a)); //输出与输入的字符对应的ASCLL码；

End.

有上面可得

ASCLL码中有两个函数

一个是ord 返回字符的埃斯科吗值

另一个是chr 返回ASCLL对应的字符

对于埃斯科吗值，有两个重要的函数

一个是ord

一个是chr

ord是返回字符的埃斯科吗值

chr则是将埃斯科吗值返回为字符