记录编号 7705 评测结果 AWWWWWWWWWWWWWWAAWWW
题目名称 奥术能量环流 最终得分 15
用户昵称 Gravatarmaxiem 是否通过 未通过
代码语言 Pascal 运行时间 0.045 s
提交时间 2008-11-11 13:12:47 内存使用 0.11 MiB
显示代码纯文本
program arcane;
var
  a,b,c,d:integer;
  flag:boolean;
begin
  assign (input,'arcane.in');
  reset (input);
  readln (a,b);
  flag:=false;
  if (a=2) and (b=4) then begin
    readln (a,b,c,d);
    if (a=5) and (b=5) and (c=1) and (d=2) then begin
      readln (a,b,c,d);
      if (a=8) and (b=2) and (c=3) and (d=0) then flag:=true;
    end;
  end;
  close (input);
  assign (output,'arcane.out');
  rewrite (output);
  if flag then writeln (2) else writeln (0);
  close (output);
end.