Sot

Все объясняется очень легко. У вас были прописаны маршруты и в роутере и на компе. Причем одинаковые. В такой конфигурации ничего работать не будет. Выход: либо прописать маршруты так, как это сделали Вы, что не правильно. Либо удалить все маршруты и пользоваться единственным маршрутом по умолчанию, который должен выдать Вам роутер.

На западном я. Подробности в ЛС.

Любой 40°

Прикольно...

Спасибо не булькает! Магарыч где?

Удачи

Ну баг явно софтовый. От железа может зависеть косвенно, например на определенную ревизию определенная прошивка, а в ней глюк.

Подобрать прошивку. А суть проблемы я помоему уже не раз описывал в этой ветке.

Сейчас получше должно быть, но вообще проблема, конечно, в роутере Вашем...

Ник на трекере свой подскажите?

Кашмар... program Project1; {$APPTYPE CONSOLE} uses SysUtils; const SizeOfA = 5; SizeOfB = 4; var A: array[1..SizeOfA] of integer = (-3, 7, 8, 10, 15); B: array[1..SizeOfB] of integer = (4, 6, 8, 16); C: array[1..SizeOfA+SizeOfB] of integer; SizeOfC, i, j, k: integer; begin SizeOfC := 0; i := 1; j := 1; k := 1; while (A[i] <= 5) and (i <= SizeOfA) do inc(i); while (B[j] <= 5) and (j <= SizeOfB) do inc(j); while (i <= SizeOfA) or (j <= SizeOfB) do begin if (i <= SizeOfA) and (j <= SizeOfB) then if A[i] < B[j] then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end else if i <= SizeOfA then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end; end; SizeOfC := k-1; for j:=1 to SizeOfC do Write(C[j]:3); readln end.

Отлично, продолжаем держать меня в курсе. А сколько торрентов у Вас раздается в торрент-клиенте?

Таки добрался я до делфей. Нуля там никакого нету. Вот полностью рабочий вариант (еще один баг отловил): const SizeOfA = 5; SizeOfB = 4; var A: array[1..SizeOfA] of integer = (-3, 7, 8, 10, 15); B: array[1..SizeOfB] of integer = (4, 6, 8, 16); C: array[1..SizeOfA+SizeOfB] of integer; SizeOfC, i, j, k: integer; begin SizeOfC := 0; i := 1; j := 1; k := 1; while (A[i] <= 5) and (i <= SizeOfA) do inc(i); while (B[j] <= 5) and (j <= SizeOfB) do inc(j); while (i <= SizeOfA) or (j <= SizeOfB) do begin if (i <= SizeOfA) and (j <= SizeOfB) then if A[i] < B[j] then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end else if i <= SizeOfA then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end; end; SizeOfC := k-1; end;

Еще один баг у себя нашел. const SizeOfA = 5; SizeOfB = 4; var A: array[1..SizeOfA] of integer = (-3, 7, 8, 10, 15); B: array[1..SizeOfB] of integer = (4, 6, 8, 16); C: array[1..SizeOfA+SizeOfB] of integer; SizeOfC, i, j, k: integer; begin SizeOfC := 0; i := 1; j := 1; k := 1; while (A[i] <= 5) and (i <= SizeOfA) do inc(i); while (B[j] <= 5) and (j <= SizeOfB) do inc(j); while (i <= SizeOfA) or (j <= SizeOfB) do begin if (i <= SizeOfA) and (j <= SizeOfB) then if A[i] < B[i] then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end else if i <= SizeOfA then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end; end; SizeOfC := k-1; end;

Блин, если проблема не актуальна, я брошу ей заниматься. У меня лично проблем нет, а вы тогда разгребывайтесь со своими роутерами как хотите. Последний раз прошу! Отписывайтесь, если вышеозначенная проблема у вас наблюдалась ранее. Даже если сейчас все работает. Кто хоть раз наступал на подобные грабли? Хотя бы просто пишите: 'Сейчас все работает' или 'Вчера не работало с 14 - 17'. Все, что может пригодиться, ПИШИТЕ! Еще раз повторяю, у меня этой проблемы нет, поэтому я даже проверить не могу, как те или иные мои эксперименты над сервером на это влияют. ЗЫ. Уже не раз пытался к этим граблям подступиться. Как только что-то сделаю временно - все замолкают. Но временно, это до первой перегрузки. Поэтому ПИШИТЕ!

Всем, у кого роутер и были проблемы с заходом! Попробуйте сейчас и ОБЯЗАТЕЛЬНО В ЛЮБОМ СЛУЧАЕ ОТПИШИТЕСЬ!

Если очень хочется рипать ТВ, то тогда уж лучше посмотреть в сторону SAT. С билайном ничего хорошего не выйдет. Или качество будет хуже, чем SAT, или только открытые каналы.

Тогда надо ехать во Владивосток, а то не успеет

Во первых HDCP. А во вторых, что там такого, что нужно гнать в комп?

Странная задача. Переводить цифру в аналог, а потом опять в цифру...

Так попробуй. const SizeOfA = 5; SizeOfB = 4; var A: array[1..SizeOfA] of integer = (-3, 7, 8, 10, 15); B: array[1..SizeOfB] of integer = (4, 6, 8, 16); C: array[1..SizeOfA+SizeOfB] of integer; SizeOfC, i, j, k: integer; begin SizeOfC := 0; i := 0; j := 0; k := 0; while (A[i] <= 5) and (i <= SizeOfA) do inc(i); while (B[j] <= 5) and (j <= SizeOfB) do inc(j); while (i <= SizeOfA) or (j <= SizeOfB) do begin if (i <= SizeOfA) and (j <= SizeOfB) then if A[i] < B[i] then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end else if i <= SizeOfA then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end; end; SizeOfC := k-1; end;

Ну во первых это банальная описка(я не проверял, что пишу). И если ты не в состоянии поправить такую банальную ерунду, значит знания твои в Delphi = 0 и помогать дальше вообще не хочется. А во вторых там еще и ошибка в алгоритме присутствует. Не на всех входных данных оно работать будет (тут реально мой косяк).

Билайновской?

Чето типа этого: const SizeOfA = 5; SizeOfB = 4; var A: array[1..SizeOfA] of integer = (-3, 7, 8, 10, 15); B: array[1..SizeOfB] of integer = (4, 6, 8, 16); C: array[1..SizeOfA+SizeOfB] of integer; SizeOfC, i, j, k: integer; begin SizeOfC := 0; i := 0; j := 0; k := 0; while (A[i] <= 5) and (i <= SizeOfA) do inc(i); while (B[j] <= 5) and (j <= SizeOfB) do inc(j); while (i <= SizeOfA) or (j <= SizeOfB) do begin if (i <= SizeOfA) and (j <= SizeOfB) then if A[i] < B[i] then begin C[k] := A[i]; inc(k); C[k] := B[j]; inc(k); inc(i); inc(j); end else begin C[k] := B[j]; inc(k); C[k] := A[i]; inc(k); inc(j); ink(i); end else if i <= SizeOfA then begin C[k] := A[i]; inc(k); inc(i); end else begin C[k] := B[j]; inc(k); inc(j); end; end; SizeOfC := k-1; end; Давай магарыч!

Если речь идет о дисках, то макровижн снимается любым нормальным рипером. И никакие TV-тюнеры не нужны.