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


На форумі обговорюються лише питання, пов'язані з олімпіадою

Ви не зайшли.

#1 2012-12-28 22:36:14

seland
Новий користувач
Зареєстрований: 2012-12-28
Повідомлень: 14

Проверка Hanoysoft

Доброго дня, шановне журі!

Код, що був відправлений на залік отримав 4 бали, в той час, як зараз на онлайн-тестуванні проходить повний бал.
Якщо можливо, поясніть, у чому полягає проблема.

Дякую. З повагою, Селіванов Андрій.

Поза форумом

 

#2 2012-12-28 22:41:04

adamant
Новий користувач
Звідки: Запорожье
Зареєстрований: 2012-10-17
Повідомлень: 141

Re: Проверка Hanoysoft

Покажите код.

Поза форумом

 

#3 2012-12-28 22:46:03

seland
Новий користувач
Зареєстрований: 2012-12-28
Повідомлень: 14

Re: Проверка Hanoysoft

Var
  n,i:word;
  a,b:byte;
  r:qword;
  m:array[0..10000] of longint;
Begin
  readln(n,a,b);
  m[0]:=1;
  for i:=1 to n do begin
    r:=m[i-1];
    r:=r*3;
    r:=r mod 1000000007;
    m[i]:=r;
  end;
  r:=0;
  for i:=0 to n-1 do
    r:=(r+m[i]) mod 1000000007;
  if abs(a-b)=1 then writeln(r)
  else begin
    r:=(r*2) mod 1000000007;
    writeln(r);
  end;
end.

Відредаговано seland (2012-12-28 22:46:14)

Поза форумом

 

#4 2012-12-29 12:32:42

Жюри_Пасихов
Адміністратор
Зареєстрований: 2009-11-08
Повідомлень: 439

Re: Проверка Hanoysoft

У вас 40 балів за задачу. Була помилка в кеші сторінки результатів. Після примусового  очищення  кешу випраилася сама по собі. Барабашка.... Приношу вибачення.

Поза форумом

 

#5 2012-12-29 14:35:58

seland
Новий користувач
Зареєстрований: 2012-12-28
Повідомлень: 14

Re: Проверка Hanoysoft

Дякую за розуміння і виправлену помилку.

Поза форумом

 

Нижній колонтитул

Powered by Likt
© Copyright 2002–2009 Likt