Второй тренировочный тур

Здраствуйте! а немогли бы вы выложить примерные задачи второго тренировочного тура?)) Они будут намного сложнее, чем в первом?

snicker писал(а):

> Здраствуйте! а немогли бы вы выложить примерные задачи второго
> тренировочного тура?)) Они будут намного сложнее, чем в первом?

Первая задача первого тура подходит, как более сложная, и для II тура. Займитесь дорешиванием, оно пока ещё открыто!

Ну вот я её дорешал)) правда на сервере она ошибку выдаёт (Runtime Error in test 1) не знаю изза чего...дома всё работает отлично...правда я на Delphi писал так как не имею Гну Паскалевского компилятора) но я думаю там функции практически одни и те же...

Только она большая слишком получилась) но решает всё мигом))))


program Pool;

var m,n,i,j,i2,j2,i3,j3,i4,j4,k,k3,k4,ud,lose,ex:integer;
xf:text;

procedure pl(k,i1,j1:integer;
var k1,i2,j2:integer);
begin
if k = 1 then begin
while (i1<m)and(j1<n) do begin
i1:=i1+1;
j1:=j1+1;
end;
i2:=i1;
j2:=j1;
if i1=m then begin
k1:=4;
exit;
end
else if j1=n then begin
k1:=2;
exit;
end;
end;


if k = 2 then begin
while (i1<m)and(j1>1) do
begin
i1:=i1+1;
j1:=j1-1;
end;
i2:=i1;
j2:=j1;
if i1=m then begin
k1:=3;
exit
end
else if j1=1 then begin
k1:=1;
exit;
end;
end;

if k = 3 then begin
while (i1>1)and(j1>1) do
begin
i1:=i1-1;
j1:=j1-1;
end;
i2:=i1;
j2:=j1;
if i1=1 then begin
k1:=2;
exit;
end
else if j1=1 then begin
k1:=4;
exit;
end;
end;

if k = 4 then begin
while (i1>1)and(j1<n) do
begin
i1:=i1-1;
j1:=j1+1;
end;
i2:=i1;
j2:=j1;
if i1=1 then begin
k1:=1;
exit;
end
else if j1=n then begin
k1:=3;
exit;
end;
end;
end;

begin
Assign(xf,'in.txt');
reset(xf);
readln(xf,m,n,i,j,k);
close(xf);
lose:=0;
i2:=i;
j2:=j;
ud:=0;
ex:=0;
i4:=0;
j4:=0;
k4:=0;

Repeat
pl(k,i2,j2,k3,i3,j3);
ud:=ud+1;

if (i4=i3)and(j4=j3)and(k4=k3) then ex:=1;

if ud=1 then begin
i4:=i3;
j4:=j3;
k4:=k3;
end;

if (i3=m)and(j3=n) then lose:=1;
if (i3=m)and(j3=1) then lose:=1;
if (i3=1)and(j3=1) then lose:=1;
if (i3=1)and(j3=n) then lose:=1;

i2:=i3;
j2:=j3;
k:=k3;


Until (lose=1)or(ex=1);

if lose=1 then begin
Assign(xf,'out.txt');
rewrite(xf);
writeln(xf,k3,' ',ud-1);
close(xf);
end
else if ex=1 then begin
Assign(xf,'out.txt');
rewrite(xf);
writeln(xf,0,' ',ud-1);
close(xf);
end;

end.



Дубовик Дмитрий Валерьевич 08-104

> правда на сервере она ошибку выдаёт (Runtime Error in test 1)
Файлы убрать не пробовал? )))
И ваще у тя WA1

> Только она большая слишком получилась) но решает всё мигом))))
действительно большая. не мигом...)

З.Ы. Саша, исправь пожалуйста нелепую опечатку:
"Личная стрпница участника..."

>Файлы убрать не пробовал? )))
на сервеа задание с чтением из файла))) так что не пробовал...
>И ваще у тя WA1
а что такое WA1?)))



Дубовик Дмитрий Валерьевич 08-104

На сервере задание с чтением из стандартного ввода.
WA 1 = Wrong Answer in test 1
Такой ответ получила твоя прога, после перевода её на чтение/вывод в файл.

Вот в подтверждение моих слов):
"Биллиард
input: стандартный ввод
output: стандартный вывод
timelimit: 1 секунда
Memorylimit: 32MB
Описание:
Автор Титов В.К., 1983 г."

Очепятка исправлена, спасибо, по поводу условия, на сервере здесь оригинальное условие (1983 год), в этом году на первой тренировке дали такую же задачу, но с немного другим условием, в котором было:
1) Небольшое логическое упрощение (хотя, по сути, задача не меняется).
2) Усложнение ввода, цель сказать, что нужно всем писать на Си, а не на Pascal'е, но здесь у автора этой задачи вышла промашка, так как на языке Pascal предложенный формат ввода было читать проще, чем на языке Си.

Сейчас практически все кто проводит олимпиады по программированию, заявили об отказе в притеснении, каких либо языков (усложнение формата ввода-вывода), но как всегда есть некоторые люди, которые заявляют обратное: "Это не я иду против народа, а народ против меня".

2nd MAI Boot Programming Contest, Autumn 2006.
Contest support system (c) 1998-2004 by Andrey L. Kalinin, andrey@kalinin.ru.

rank name login a b c = Score
-------------------------------------------------------------
1 Рязанцева О. В. 11_107 1+ 1- 2+ 2 144
2 Самбукова Е. А. 21_108 2+ 0- 1+ 2 215
3 Дубовик Д. В. 4_104 4+ 0- 1+ 2 256
4 Велицкий А. В. 1_105 1+ 1- 0- 1 2
5 Турунов Г. Н. 20_106 1+ 3- 0- 1 5
6 Духовенский С. Е. 6_107 1+ 3- 0- 1 9
7 Потапов Е. В. 9_102 1+ 0- 0- 1 19
8 Шемякина В. А. 15_105 1+ 0- 0- 1 19
9 Люлякин О. П. 12_104 1+ 0- 0- 1 23
10 Костин В. И. 7_107 2+ 0- 0- 1 53
11 Терешин П. В. 13_105 2+ 0- 0- 1 62
12 Воробьёв Е. А. 2_106 0- 0- 1+ 1 86
13 Шукшина В. А. 14_103 3+ 0- 0- 1 89
14 Сергукова Ю. М. 22_108 1+ 0- 0- 1 90
15 Дубова И. В. 6_105 3+ 1- 0- 1 103
16 Гаранин А. Н. 4_107 5+ 3- 0- 1 138
17 Федотов А. А. 13_101 0- 0- 2+ 1 147
18 Захаров А. В. 5_104 0- 0- 2+ 1 171
19 Кысса В. П. 15_108 5- 0- 3+ 1 171