比赛 测试比赛 评测结果 AAAA
题目名称 加法问题 最终得分 100
用户昵称 francis 运行时间 0.000 s
代码语言 Pascal 内存使用 0.00 MiB
提交时间 2008-04-21 17:36:16
显示代码纯文本
program ab;
var
a,b:real;
c:longint;
f1,f2:text;
begin
assign(f1,'aplusb.in');
assign(f2,'aplusb.out');
reset(f1);
rewrite(f2);
read(f1,a,b);
c:=trunc(a+b);
write(f2,c);
close(f1);
close(f2);
end.