Pascal里的case语句,试编写一个根据用户键入的两个操作数和一个运算符由计算机输出运算结果的程序

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/06/30 19:58:33

Pascal里的case语句,试编写一个根据用户键入的两个操作数和一个运算符由计算机输出运算结果的程序
整个程序是这样
但是怎么把操作数与运算符写同一行?如'5+3'?
我只能这样输入'5 3'
'+'
var
result,x,y:real;
ch:char;
flag:boolean;
begin
readln(x,y);
readln(ch);
result:=0;
flag:=true;
case ch of
'+':result:=x+y;
'-':result:=x-y;
'*':result:=x*y;
'/':if y 0 then
result:=x/y;
else
flag:=false;
end;
if flag then writeln(result:0:2)
else writeln('Error');
end.

这个简单,我在区里比赛时写过：
program exp;
var c,op:string[1];
sc:string;
a,b:longint;
err:integer;
begin
assign(input,'exp.in');reset(input);
assign(output,'exp.out');rewrite(output);
read(INPUT,c);
sc:='';
while (c'+')and(c'-')and(c'*') do
begin
sc:=sc+c;
c:='';
read(input,c);
end;
val(sc,a,err);
sc:='';
op:=c;
c:='';
read(INPUT,c);
sc:='';
while not eof(input) do
begin
sc:=sc+c;
c:='';
read(input,c);
end;
sc:=sc+c;
val(sc,b,err);
if op='+' then writeln(output,a+b);
if op='-' then writeln(output,a-b);
if op='*' then writeln(output,a*b);
close(input);
close(output);
end.
再问： = =你的回答真的是pascal语言么。。看不懂。。
再答：我不就是加了文件吗？我给你换调。 program exp; var c,op:string[1]; sc:string; a,b:longint; err:integer; begin read(c);//读入第一个字符。 sc:=''; while (c'+')and(c'-')and(c'*') do//后面不是‘+’，‘-’，‘*’就继续 begin sc:=sc+c;//累加到sc里面 c:=''; read(c);//继续读入 end; val(sc,a,err);//转换数值 sc:=''; op:=c; c:='';//清空 read(c); sc:=''; while not eoln do//没有按enter就继续 begin sc:=sc+c; c:=''; read(c); end; sc:=sc+c; val(sc,b,err); if op='+' then writeln(a+b); if op='-' then writeln(a-b); if op='*' then writeln(a*b); end.

Pascal里的case语句,试编写一个根据用户键入的两个操作数和一个运算符由计算机输出运算结果的程序用C++编写一个计算器程序.用户输入两个运算数和四则运算符,输出计算结果. 编写一个C++程序,根据用户输入的举行矩形的长和宽,计算矩形的周长和面积,并将运算结果在用户屏幕输出. 用c++编写一个程序,输入两个实数和一个四则运算符（+,-,*,/）,根据运算符执行相应的运算并输出结果. 编写一个进行加减乘除四则运算的程序,要求输入2个数,然后输入个运算符,输出两个数运算的结果,控制台应输入一个由两个整数和一个算术运算符（+、-、*）组成的表达式,根据运算符完成相应的运算,并将结果输出. 编写一个程序,计算两个非0的实数的加,减,乘,除运算的结果(要求输入两个非0实数,输出运算结果) C从键盘上输入任意两个数和一个运算符（+、-、*、/）,* 根据输入的运算符对两个数计算,并输出结果编写一个程序,计算两个非0实数的加、减、乘、除运算的结果（要求输入两个非0实数,输出运算结果）编写一个程序,计算两个非0实数的加、减、乘、除运算的结果.（要求输入两个非0实数.输出运算结果）编写一个程序,计算两个非零实数的加,减,乘,除运算的结果(要求输入两个非零实数,输出运算结果) 编写一个程序,计算两个非零实数的加、减、乘、除运算的结果（要求输入两个非零实数,输出运算结果