比赛代码 - COGS

比赛	HAOI2009 模拟试题2	评测结果	WWAWWWWWWW
题目名称	棋盘上的问题	最终得分	10
用户昵称	lc	运行时间	0.000 s
代码语言	Pascal	内存使用	0.00 MiB
提交时间	2009-04-22 11:27:02

显示代码纯文本

program board;
  var
      x,y,n,m,i:  longint;

  procedure Main;

    begin
      readln(n,m);
      for i :=1 to m do read(x,y);
      writeln(m);
    end;

  begin
    assign(input,'board.in'); reset(input);
    assign(output,'board.out'); rewrite(output);
    Main;
    close(input); close(output);
  end.