Форум Всеукраїнської інтернет-олімпіади NetOI

Хто може пояснити, чому на тестах розв'язок проходить на 20 балів у той час як в таблиці з результатами лише 18 балів? Розв'язок не змінювався абсолютно.

Дякую за відповідь! Сподіваюся на коментар від журі, хоча б для загального розуміння, як проходить тестування до та після оголошення результатів.

Код, який на тестах РЕГУЛЯРНО, без жодного винятку, набирає 20 балів з 20 (з 1 по 6 та 8 - 0.01 сек, 7- 0.02 сек, 9 та 10 - 0.03 сек),
а офіційний результат всього 6 балів (коментарів не маю)

Program Sale; 
Const   Mx = 2000;
Var  MS: array[1..Mx] of int64;  
Var K:int64;
Var N,D,M,Y:integer;
Var i:integer;


BEGIN 
for i := 1 to Mx do MS[i]:=0;

Read(N); 
for i := 1 to N do 
 BEGIN          
 Read(K,D,M,Y);
 MS[D+32*M+500*Y]:= K;
 END; 

for i :=1 to Mx do 
if MS[i]>0 then
 BEGIN         
 K:=MS[i];
 Y:=i div 500;
 M:=(i-Y*500) div 32;
 D:=i -(Y*500) - (M*32);
 writeln(K,' ' ,D,' ', M,' ', Y);    
 END 
END.

Відредаговано skmg (2015-11-14 23:47:37)

Надіслав.

Відредаговано skmg (2015-11-16 20:00:54)

В мене та ж сама проблема задача проходить повністю в автоматичній перевірці хоча зараховано тільки 6 балів
program Sale;
var

c2:longint;
c:byte;
i,j,n:integer;
a:array[1..1200,2..4] of byte;
k:array[1..1200] of longint;
begin

  readln(n);
  for i:=1 to n do   readln(k[i],a[i,2],a[i,3],a[i,4]);
     

   
   for i:=1 to n-1 do
     begin
       for j:=1 to  n-i do
         begin
           if a[j,4]>a[j+1,4]then
             begin
               c:=a[j,4];
               a[j,4]:=a[j+1,4];
               a[j+1,4]:=c;
               
               c:=a[j,3];
               a[j,3]:=a[j+1,3];
               a[j+1,3]:=c;

               c:=a[j,2];
               a[j,2]:=a[j+1,2];
               a[j+1,2]:=c;
               
               c2:=k[j];
               k[j]:=k[j+1];
               k[j+1]:=c2;


             end else if (a[j,4]=a[j+1,4])and(a[j,3]>a[j+1,3])then
             begin
               c:=a[j,4];
               a[j,4]:=a[j+1,4];
               a[j+1,4]:=c;

               c:=a[j,3];
               a[j,3]:=a[j+1,3];
               a[j+1,3]:=c;

               c:=a[j,2];
               a[j,2]:=a[j+1,2];
               a[j+1,2]:=c;

               c2:=k[j];
               k[j]:=k[j+1];
               k[j+1]:=c2;
             end else if (a[j,4]=a[j+1,4])and(a[j,3]=a[j+1,3]) and(a[j,2]>a[j+1,2])then
             begin
               c:=a[j,4];
               a[j,4]:=a[j+1,4];
               a[j+1,4]:=c;

               c:=a[j,3];
               a[j,3]:=a[j+1,3];
               a[j+1,3]:=c;

               c:=a[j,2];
               a[j,2]:=a[j+1,2];
               a[j+1,2]:=c;

              c2:=k[j];
               k[j]:=k[j+1];
               k[j+1]:=c2;
             end;
         end;
     end;



  for i:=1 to n do
    begin
      write(k[i],' ',a[i,2],' ',a[i,3],' ');writeln(a[i,4]) ;
    end;

end.

Жюри_Пасихов написав:

Все расхождения связаны с таймингами. Они у нас очень жесткие... Время считаем до 0.01 с. ...
При официальной проверке...  (результат защитывастся, если он одинаков при 3-х разовом прохождении теста).

Это цитата с прошлогодней олимпиады. Нужно ли буквально понимать утверждение в скобках?
Т.е., к примеру, при тайминге 0.09 сек, трехразовое прохождение теста дало результаты 0.04 сек, 0.03 сек и еще раз 0.04 сек, будет ли такой результат не засчитан, как утверждается в цитате(в скобках)?

Хочется понять, почему на этой задаче столько СУЩЕСТВЕННО заниженных при проверке результатов, чтобы избежать в дальнейшем.

Тому що, дійсно, на тесті 10 результат в основному 0.03 сек, але приблизно один раз з восьми-десяти спроб буває 0.04 сек.

Відредаговано skmg (2015-11-18 23:40:20)

Жюри_Пасихов написав:

illia написав:

Дякую, листував на olymp@olymp.vinnica.ua - результати змінилися.

Мы провели повторное официальное тестирование ВСЕЙ базы решений задачи  Sale, увеличив на 0.01 с время на тест. Исключительно в интересах участников.

Красно дякуємо!