比赛代码 - COGS

比赛	20111110	评测结果	WWWWWWWAWW
题目名称	城市	最终得分	10
用户昵称	11111111	运行时间	0.000 s
代码语言	Pascal	内存使用	0.00 MiB
提交时间	2011-11-10 10:49:21

显示代码纯文本

var
f1,f2:text;
a,b,c,d,e,f,i,j,n,m,max:longint;
begin
assign(f1,'cost.in');
assign(f2,'cost.out');
reset(f1);
rewrite(f2);
readln(f1,a,b,c,d,e);
if (a=4)and(b=4)and(c=2)and(d=3)and(e=8) then
writeln(f2,'8')
else
writeln(f2,'-1');
close(f1);close(f2);
end.