比赛代码 - COGS

比赛	20100422	评测结果	AAAAAAAA
题目名称	删掉的边	最终得分	100
用户昵称	echo	运行时间	0.000 s
代码语言	Pascal	内存使用	0.00 MiB
提交时间	2010-04-22 09:24:01

显示代码纯文本

program edges;
var
    n,m,l:integer;
    f1,f2:text;
begin
  assign(f1,'edges.in');
  reset(f1);
  read(f1,n,m);
  close(f1);

  l:=m-(n-1);

  assign(f2,'edges.out');
  rewrite(f2);
  writeln(f2,l);
  close(f2);
end.