Pascal :
program hello; var a,b,c,s:real; begin while not eof(input) do begin readln(a,b); c:=a+b; s:=a*b; writeln('C=',c:0:2,' S=',s:0:2); end; end.
注册一个 FMCRAFT OJ 通用账户,您就可以在我们提供的所有在线评测服务上提交代码、参与讨论。
使用您的 FMCRAFT OJ 通用账户