UC知道pascal简易计算器运行错误
来源：百度知道 编辑：UC知道 时间：2024/05/26 13:40:18
我在运行简易计算器的时候,为什么总是出现运行错误呢,下面是源程序,编译没问题.
program calc(input,output);
var
a,b,result:real;
ch:char;
begin
read(a,ch,b);
case ch of
'+':result:=a+b;
'-':result:=a-b;
'*':result:=a*b;
'/':result:=a/b;
end;{case}
write(result);
end.
运行时输入3+2,老是说错误的数据格式.想请教一下
如何写程序才能不出现这样的错误呢?
program calc(input,output);
var
a,b,result:real;
ch:char;
begin
read(a,ch,b);
case ch of
'+':result:=a+b;
'-':result:=a-b;
'*':result:=a*b;
'/':result:=a/b;
end;{case}
write(result);
end.
运行时输入3+2,老是说错误的数据格式.想请教一下
如何写程序才能不出现这样的错误呢?
这个问题我也遇到过
http://zhidao.baidu.com/question/22477360.html
试了N种方法后
不出错的方法就一种
readln(a，b); readln(ch);
因为直接输3+2,程序将'3+2'读在a里面,但是3+2是字符串不是实数,所以出现类型错误.
输入3 + 2就可以了.
因为直接输3+2,程序将'3+2'读在a里面,但是3+2是字符串不是实数,所以出现类型错误.