比赛代码 - COGS

比赛	20091112练习	评测结果	AWWWWW
题目名称	阿里巴巴	最终得分	16
用户昵称	ybh	运行时间	0.000 s
代码语言	Pascal	内存使用	0.00 MiB
提交时间	2009-11-12 11:44:57

显示代码纯文本

program t2;
var
  i,n:integer;
begin
  assign(input,'ali.in');
  reset(input);
  assign(output,'ali.out');
  rewrite(output);
  readln(n);
  if n=2 then
  begin
    writeln('NIE');
    writeln(9)
  end
  else
  begin
    for i:=1 to n do
      writeln('NIE')
  end;
  close(input);
  close(output)
end.