UC知道请教一个低级的pascal val问题
来源：百度知道 编辑：UC知道 时间：2024/05/10 12:39:52
program ex_1;
var st:string;
x,y:integer;
begin
st:='1234' //就输入1234的时候显示x的值是1234
val（st,x，y）； //而输入123456的时候x的值-7616
writeln(x:3);
writeln(y:3);
readln;
end.
刚学的pascal．．．请别见笑
var st:string;
x,y:integer;
begin
st:='1234' //就输入1234的时候显示x的值是1234
val（st,x，y）； //而输入123456的时候x的值-7616
writeln(x:3);
writeln(y:3);
readln;
end.
刚学的pascal．．．请别见笑
X的值超过了整型的最大范围，将X的类型由integer改为longint即可
x改为Longint
integer 只有-32768~32767 范围超出Error 26-------改长一点长度 longint 或real 如果用real ,write(x:5:5)就ok了