ENG  RUSTimus Online Judge
Online Judge
Problems
Authors
Online contests
About Online Judge
Frequently asked questions
Site news
Webboard
Links
Problem set
Submit solution
Judge status
Guide
Register
Update your info
Authors ranklist
Current contest
Scheduled contests
Past contests
Rules
back to board

Common Board

To admins: Somethig is wrong
Posted by Alabaster 24 Jul 2002 01:46
Your testers aren't OK. f.e. This solution is ACC:

#include <iostream.h>
int a;

int main()
{
 cin >> a;
 return 0;
}

And this got CRASH:

int main()
{
 return 0;
}

All codes in C++.
Somethig is really wrong :)
Posted by Mephistos 24 Jul 2002 02:28
I've tried to submit problem 1190. This got restricted function:

var
  N:Integer;

procedure Inp;
begin
  ReadLn(N);
end;

procedure SkipName;
var
  C:Char;
begin
  C:=#0;
  while C<>' ' do Read(C);
end;

procedure Run;
var
  I, B, W, C:LongInt;
  TV:LongInt;
  All:Boolean;
begin
  C:=0;
  TV:=0;
  All:=True;
  for I:=1 to N do
    begin
      SkipName;
      Read(B);
      if (B<>0) then
        begin
          Read(W);
          TV:=TV+W*(C+1);
          C:=0;
        end
      else
        begin
          Inc(C);
          All:=False;
        end;
    end;
  TV:=TV+C;
  if (TV>10000) or ((All) and (TV<>10000)) then WriteLn('NO')
  else WriteLn('YES');
end;

procedure Out;
begin
end;

begin
  Inp;
  Run;
  Out;
end.
-------------------------

And this got accepted:

begin
  WriteLn('NO');
end.