比赛代码 - COGS

比赛	20111012	评测结果	EEEEEEEEEE
题目名称	空中楼阁	最终得分	0
用户昵称	11111111	运行时间	0.000 s
代码语言	Pascal	内存使用	0.00 MiB
提交时间	2011-10-12 21:48:44

显示代码纯文本

var
a,b,c:integer;
f1,f2:text;
begin
assign(f1,'house,in');
assign(f2,'house.out');
reset(f1);
rewrite(f2);
readln(f1,a,b,c);
if (a=4)and(b=5)and(c=2) then writeln(f2,'2')
else
writeln(f2,'Poor Z4!');
close(f1);close(f2);
end.