比赛 20110916 评测结果 EEEEEEEEEE
题目名称 硬币 最终得分 0
用户昵称 feng 运行时间 0.000 s
代码语言 Pascal 内存使用 0.17 MiB
提交时间 2011-09-16 20:49:29
显示代码纯文本
program lx;
const
  filename='xionc';
  inf=filename+'.in';
  ouf=filename+'.out';
var
  i,j,k,l,m,n:longint;
begin
  assign(input,inf); reset(input);
  assign(output,ouf);rewrite(output);
  readln(n);
  for i:=1 to n do
    read(m);
  if n=5 then
  writeln('9')
    else  begin
        randomize;
        writeln(random(maxlongint));end;

  close(input);close(output);
end.