Question

pascal语言字符转换数字函数

Answer 1

ord(x)可以返回x的编号,如果x是字符类型,将转换成ASCII码.这时,如果你有字符数字a,ord(a)-48就是它对应的数字.(这是因为'0','1'...'9'分别对应ASCII码48,49...57)
而val(s, n, f)是一个过程,它将字符串s转换为数字存储给长整形数n.f是一个长整数,用来存储错误信息,平常不用理会,并且可以省略.如果有一个字符数字串st,val(st,n)就可以吧st转化成长整形数存入n.

Answer 2

(1)var
a:char;
b:integer;

begin
read(a);
b:=ord(a)-48;
write(b);
end.

(2)var
a:string;
b:array[1..500] of integer;
n,i:integer;
w:char;

begin
read(a);
n:=length(a);
for i:=1 to n do begin
w:=copy(a,i,1)[1];
b[i]:=ord(w)-48;
end;

for i:=1 to n do write(b[i]);
end.

Answer 3

val（s，k，l） 整个串转换，s：string；l，k：longint；（值在k中，l判断是否成功）
ord（ch） 单个字母转换，为ASCLL码

Answer 4

var
s,j:integer;
b:string;
begin
b:='123456';
val(b,s,j);
end.

Answer 5

你是问把ASCII码转换成对应字符的函数吗？是chr(i)

——百度知道团队pas世界欢迎你加入！