大神为什么第一个AC,第二个WA,其它都是RE?求解!
  • 板块P1781 宇宙总统
  • 楼主nbhsy
  • 当前回复7
  • 已保存回复7
  • 发布时间2016/9/26 18:36
  • 上次更新2024/7/6 14:09:13
查看原帖
大神为什么第一个AC,第二个WA,其它都是RE?求解!
23425
nbhsy楼主2016/9/26 18:36
var a:array[1..1000000]of int64;
  n,m,max,i:longint;
begin
  read(n);
  read(a[1]);
  max:=a[1];
  m:=1;
  for i:=2 to n do begin
                      read(a[i]);
                      if a[i]>max then begin
                                          m:=i;
                                          max:=a[i];
                                       end;
                   end;
   writeln(m);
   write(max);
end.
2016/9/26 18:36
加载中...