手机轰炸机免费版在线:这是一个什么样的编程?关于PASCAL

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/27 18:37:20
program aa;
var
a,b,c:real;
q:char;
begin
readln(a);
readln(q);
readln(b);
case q of
'+':c:=a+b;
'-':c:=a-b;
'*':c:=a-b;
'/':c:=a/b;
end;
write(c:2:5);
writeln;
end.

这是一个什么样的编程?关于PASCAL

这是一个做加减乘除的运算的程序

begin
readln(a); (先读入第一个要处理的数)
readln(q); (再读入符号)
readln(b); (再读入另一个数)
case q of (判断 Q 是什么)
'+':c:=a+b; (如果是‘+’号,则用A 加上 B)
'-':c:=a-b; (同上)
'*':c:=a-b;
'/':c:=a/b;
end;
write(c:2:5); (输出)
writeln;
end.

加我的Q:240904843
一起讨论编程
加我时请说明

readln(a);//读入第一个数字,注意是readln否则会出错
readln(q);//读入符号
readln(b);//读入第二个数字
case q of
'+':c:=a+b;
'-':c:=a-b;
'*':c:=a-b;
'/':c:=a/b;//应该要讨论b=0
end; //根据符号计算表达式的值,将该值赋给c
write(c:2:5);// 输出c

是一个用case语句计算表达式值的编程?