比赛代码 - COGS

比赛	NOIP_5	评测结果	AWAWWWWWWW
题目名称	Perform巡回演出	最终得分	20
用户昵称	dingding	运行时间	0.000 s
代码语言	Pascal	内存使用	0.00 MiB
提交时间	2008-09-24 21:21:05

显示代码纯文本

program ds;
var
   e:text;
   n,m:longint;
begin
   assign(e,'candy.in');
   reset(e);
   readln(e,m,n);
   close(e);
   assign(e,'candy.out');
   rewrite(e);
   if (m=3) and (n=6) then writeln(e,'460') else
   writeln(e,'0');
   close(e);
end.