Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.01.2012, 20:34   #1
New man
Форумчанин
 
Регистрация: 24.01.2011
Сообщений: 774
По умолчанию Олимпиадные задачи регионального этапа

В общем, олимпиада закончилась, и я хочу узнать решение тех задач, которые не смог решить и показать решение. Просьба помочь мне в этом деле, т.к. найти решения в интернете реально невозможно.
вот задания первого дня
Вложения
Тип файла: doc day1-v3.doc (90.0 Кб, 25 просмотров)
a.k.a. Angelicos Phosphoros
Мой сайт

Последний раз редактировалось New man; 23.01.2012 в 20:45.
New man вне форума Ответить с цитированием
Старый 23.01.2012, 20:36   #2
_-Re@l-_
C++, Java
Старожил
 
Аватар для _-Re@l-_
 
Регистрация: 10.04.2010
Сообщений: 2,665
По умолчанию

New man
Ты из какого города?

P.S. Я тож писал региональную.
_-Re@l-_ вне форума Ответить с цитированием
Старый 23.01.2012, 20:48   #3
New man
Форумчанин
 
Регистрация: 24.01.2011
Сообщений: 774
По умолчанию

Янаул
Башкирия
p.s Участвовал в уфе
a.k.a. Angelicos Phosphoros
Мой сайт
New man вне форума Ответить с цитированием
Старый 23.01.2012, 20:50   #4
New man
Форумчанин
 
Регистрация: 24.01.2011
Сообщений: 774
По умолчанию

задача про цапли, 100% правильно
Код:
program herons;
function min(x,y:longword):longword;
begin
  if x>y then result:=y else result:=x;
end;
function max(x,y:longword):longword;
begin
  if x<y then result:=y else result:=x;
end;

var a,b,minim,maxim:longword;
  f:textfile;
begin
   assignfile(f,'herons.in');
   reset(f);
   read(f,a);
   read(f,b);
   closefile(f);
   assignfile(f,'herons.out');

       maxim:=min(a,b);
       minim:=max(a,b)div 2+max(a,b)mod 2;

   rewrite(f);
   write(f,minim,' ',maxim);
   flush(f);
   closefile(f);
end.
про мальчиков и девочек 100% правильно
Код:
program table;
var m,n,i,max:word;
  c:char;
  f:textfile;
  str:string;
label konec;
begin
  str:='';
  assignfile(f,'table.in');
  reset(f);
  read(f,m,n);
  closefile(f);
  assignfile(f,'table.out');

  if  m shl 1=n then
      begin
        for i:=1 to m do str:=str+'BGG';
        goto konec;
      end;

  if (m=0)or (n=0) then  //Тогда нет хорошего положения
    begin
      if m=0 then begin c:='G'; max:=n end else begin c:='B';max:=m end;
      for i:=1 to max do str:=str+c;
      goto konec;
    end;
  if M>=N then
       begin
        for i:= 1 to n shr 1 do str:=str+'BGG';
        for i:= 1 to n mod 2 do str:=str+'BG';
        for i:= 1 to m-(n shr 1)-(n mod 2) do str:='B'+str;
       end else
     if m shl 1 < n then
      begin
        for i:=1 to m do str:=str+'BGG';
        for i:=1 to n-m shl 1 do str:=str+'G';
      end else
      begin
        for i:=1 to n shr 1 do str:=str+'BGG';
        for i:=1 to n mod 2 do str:=str+'BG';
        for i:=1 to m-(n shr 1)-(n mod 2)do str:='B'+str;
      end;
konec:
  rewrite(f);
  write(f,str);
  flush(f);
  closefile(f);
end.
в первом туре другие не смог сделать
a.k.a. Angelicos Phosphoros
Мой сайт
New man вне форума Ответить с цитированием
Старый 23.01.2012, 21:09   #5
_-Re@l-_
C++, Java
Старожил
 
Аватар для _-Re@l-_
 
Регистрация: 10.04.2010
Сообщений: 2,665
По умолчанию

Цитата:
задача про цапли, 100% правильно
Ну да, это понятно. У меня тож 100 за неё.
Цитата:
про мальчиков и девочек 100% правильно
Ясно. Но вот у меня за неё 5 баллов из 100, не знаю почему, хотя тесты она проходила у меня на компьютере самые различные, а вот проверяющая система рассудила иначе. На апелляцию не ходил.

Ну, 3 задача - это , как мне сказали, ( если не ошибаюсь), через конечные автоматы.
А 4 задача - не знаю, не решал, толком даже не читал, на разборе не был.
_-Re@l-_ вне форума Ответить с цитированием
Старый 23.01.2012, 22:03   #6
Сtrl
C++
Форумчанин
 
Аватар для Сtrl
 
Регистрация: 27.03.2011
Сообщений: 803
По умолчанию

Решения от жюри доступны на сайте http://ejudge.179.ru/.
Ищете информацию по C++?
cplusplus.com
Сtrl вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Олимпиадные задачи по программированию _-Re@l-_ Свободное общение 66 09.03.2013 22:41
олимпиадные задачи 2011-2012 evgeniyvol Паскаль, Turbo Pascal, PascalABC.NET 3 08.12.2011 22:49
олимпиадные задачи на паскале evgeniyvol Помощь студентам 3 07.12.2011 06:48
Олимпиадные задачи в паскале scoprion Помощь студентам 2 28.11.2010 17:23
Помогите решите олимпиадные задачи, пожалуйста!!! student523 Помощь студентам 1 17.12.2007 17:01