pascal初学者提问[j8]四则运算Time Limit:1000MS Memory Limit:65536KTotal Submit:35 Accepted:20 Description 输入四则运算(+ - * /)算式,计算结果(保留2位小数).Input Output Sample Input 2+3Sample Output 5.00Source

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/13 16:44:03

pascal初学者提问[j8]四则运算Time Limit:1000MS Memory Limit:65536KTotal Submit:35 Accepted:20 Description 输入四则运算(+ - * /)算式,计算结果(保留2位小数).Input Output Sample Input 2+3Sample Output 5.00Source
pascal初学者提问
[j8]四则运算
Time Limit:1000MS Memory Limit:65536K
Total Submit:35 Accepted:20
Description
输入四则运算(+ - * /)算式,计算结果(保留2位小数).
Input
Output
Sample Input
2
+
3
Sample Output
5.00
Source

pascal初学者提问[j8]四则运算Time Limit:1000MS Memory Limit:65536KTotal Submit:35 Accepted:20 Description 输入四则运算(+ - * /)算式,计算结果(保留2位小数).Input Output Sample Input 2+3Sample Output 5.00Source
同学呀,学pascal是要练的,不能这样每道题都到网上问啊,找个老师问一问方法会更好,
不过我还是给出代码吧:
program j8;
var a,b:real;
c:char;
begin
readln(a);
readln(c);
readln(b);
if c='+' then a:=a+b
else if c='-' then a:=a-b
else if c='*' then a:=a*b
else if c='/' then a:=a/b;
writeln(a:0:2);
end.