|
Вернуться
| 1 Ниненко А. Е, 18 марта 2010 г. 22:17:03 | |
|
Субач Алексей Дмитриевич, ахах, где ты свободную страну увидел? жжешь)
|
|
|
| 2 Маскин М.В., 18 марта 2010 г. 19:08:57 | |
|
Я делаю что ХОЧУ как ты сказал и никого не оскорбляю. Я просто задал парочку вопросов
|
|
|
| 3 Субач Алексей Дмитриевич, 18 марта 2010 г. 19:00:33 | |
Екатерина Левина
ну ЭТО уже их дело!!! свободная страна это значит делать ЧТО ХОЧЕШЬ но не мешать(оскорблять и т.д.) другим!!!!!!!
ОНИ НИКОМУ не мешают! вот и пусть делают что хотят ЭТО ИХ ДЕЛО!!!
|
|
|
| 4 Екатерина Левина, 18 марта 2010 г. 18:25:57 | |
Субач Алексей Дмитриевич
форум - место общественное.
если парни хотят обсудить что-то пусть "валят" в скайп, аську или еще куда.
|
|
|
| 5 Субач Алексей Дмитриевич, 18 марта 2010 г. 18:22:09 | |
|
ОСТАВЬТЕ В ПОКОЕ ПАРНЕЙ БЛИН!!!! ГОВОРЮ Я ВАМ НЕ СУЙТЕ СВОЙ НОС НЕ В СВОИ ДЕЛА!!!
|
|
|
| 6 Маскин М.В., 18 марта 2010 г. 17:38:15 | |
Зачем делиться? Тем более задачи то тут не такие уж сложные (и еще без объяснений)
Смысл? Чтобы люди просто отправили и получили в статистику плюс? в общем дело ваше
А то что тема подписана не значит, что сюда зайти мы не можем
|
|
|
| 7 Ниненко А. Е, 18 марта 2010 г. 17:36:58 | |
|
PS жаба(jabber, XMPP) отличная вещь, создайте свою конференцию и делитесь там чем угодно:)
|
|
|
| 8 Ниненко А. Е, 18 марта 2010 г. 17:33:13 | |
|
Саенко Антон Сергеевич, ради Бога, делитесь в личке, в аське, жабе. Зачем форум попусту засирать? Не мешало бы ввести определенные правила для форума, а то у каждого они свои
|
|
|
| 9 Саенко Антон Сергеевич, 18 марта 2010 г. 15:29:04 | |
|
люди мы делимся задачами кто какие не решил если вам что то не нравится то идите из темы и не мешайте и вобще мне на ваше мнение пофиг а тема подписана))
|
|
|
| 10 Маскин М.В., 17 марта 2010 г. 17:23:12 | |
|
Ага пусть пишут, только их удалят очень скоро
|
|
|
| 11 Субач Алексей Дмитриевич, 17 марта 2010 г. 16:45:30 | |
Бывает что человек не имеет возможности поговорить в ЛС, пишет сюда...
и вообще если Шмидту пофиг:), то и нечего обсуждать, пусть ребята пишут свои коды на форуме сколько душе угодно
|
|
|
| 12 Ниненко А. Е, 17 марта 2010 г. 13:45:19 | |
Субач Алексей Дмитриевич,
цитата
"суешь свой нос не свои дела!!!"
Интересно какие это не свои дела? Раз создавалась тема в форуме, то она создавалась для всех, а "свои дела" ведите в личной переписке
|
|
|
| 13 Шмидт А. А. [AS PPS] (SKYDOS), 17 марта 2010 г. 12:58:43 | |
|
пофиг мне на всё :)
|
|
|
| 14 Субач Алексей Дмитриевич, 17 марта 2010 г. 12:55:21 | |
Шмидт, тебе пофиг???
они что тебе мешают? эт ты херней страдаешь что суешь свой нос не свои дела!!!
мне лично пофиг чо они делают, главное чтоб не писали мат и флуд
|
|
|
| 15 Шмидт А. А. [AS PPS] (SKYDOS), 17 марта 2010 г. 12:43:38 | |
|
херней страдаете... неужели посмотреть свои исходники по ссылкам(номерам отправок) не можете??
|
|
|
| 16 Саенко Антон Сергеевич, 17 марта 2010 г. 11:52:12 | |
Var n,i,j,k,max:longint;
a:array[1..1000,1..1000] of LongInt;
Begin
Assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
Read(n);
For i:=1 to n do
For j:=1 to n do
Read(a[i,j]);
For k:=1 to n do
For i:=1 to n do
For j:=1 to n do
If ((a[i,j]>a[i,k]+a[k,j]) and (i<>j) and (a[i,k]<>-1)and(a[k,j]<>-1)) or ((a[i,j]=-1) and (a[i,k]<>-1) and(a[k,j]<>-1)) then a[i,j]:=a[i,k]+a[k,j];
max:=0;
For i:=1 to n do
Begin
For j:=1 to n do
If a[i,j]>max then max:=a[i,j];
End;
WriteLn(max);
Close(input);
Close(output);
END.
|
|
|
| 17 Саенко Антон Сергеевич, 17 марта 2010 г. 11:51:40 | |
Var n,i,j,k:longint;
a:array[1..1000,1..1000] of LongInt;
Begin
Assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
Read(n);
For i:=1 to n do
For j:=1 to n do
Read(a[i,j]);
For k:=1 to n do
For i:=1 to n do
For j:=1 to n do
If (a[i,j]>a[i,k]+a[k,j]) then a[i,j]:=a[i,k]+a[k,j];
For i:=1 to n do
Begin
For j:=1 to n do
Write(a[i,j],' ');
WriteLn;
End;
Close(input);
Close(output);
END.
|
|
|
| 18 Саенко Антон Сергеевич, 17 марта 2010 г. 11:51:26 | |
Var n,i,j,k,s,f:longint;
a:array[1..1000,1..1000] of LongInt;
Begin
Assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
Read(n,s,f);
For i:=1 to n do
For j:=1 to n do
Read(a[i,j]);
For k:=1 to n do
For i:=1 to n do
For j:=1 to n do
If ((a[i,j]>a[i,k]+a[k,j]) and (i<>j) and (a[i,k]<>-1)and(a[k,j]<>-1)) or ((a[i,j]=-1) and (a[i,k]<>-1) and(a[k,j]<>-1)) then a[i,j]:=a[i,k]+a[k,j];
WriteLn(a[s,f]);
Close(input);
Close(output);
END.
|
|
|
| 19 Саенко Антон Сергеевич, 17 марта 2010 г. 11:42:42 | |
var s,p,l,s1,s2,x,y:longint;
q,w:char;
begin
assign(input,'input.txt');
reset(input);
assign(Output,'output.TXT');
rewrite(output);
s1:=0;
s2:=0;
while not seekeof do
begin
read(q,w);
val(q,x,p);
val(w,y,p);
s1:=s1+x;
s2:=s2+y;
end;
l:=s1-s2;
if l mod 11=0 then writeln('YES')
else writeln('NO');
close(input);
close(output);
end.
|
|
|
| 20 Саенко Антон Сергеевич, 17 марта 2010 г. 11:42:37 | |
|
нам))
|
|
|
Чтобы оставить сообщение необходимо зарегистрироваться и авторизоваться!
| |
