Конкурс на Исходниках. С призами

← →
Rouse_ © (2009-11-06 22:46) [80]

> Демо © (06.11.09 22:34) [79]
>
> 3 символа экономия-)

И килограvм гемороя :)
I: DWORD; for I := 0 to List.Count - 1 do

← →
Германн © (2009-11-06 23:00) [81]

> И килограvм гемороя :)

Но только в одном случае из MaxInt вариантов!
:)

← →
Ins © (2009-11-07 00:03) [82]

> из MaxInt вариантов!

Не мелочись, вариантов больше :) Это же DWORD!

← →
Демо © (2009-11-07 00:35) [83]

Ну до чего ж извращённая функция получается...

← →
Демо © (2009-11-07 00:36) [84]

Весёлая задачка!

← →
Германн © (2009-11-07 01:15) [85]

> Ins © (07.11.09 00:03) [82]
>
>
> > из MaxInt вариантов!
>
>
> Не мелочись, вариантов больше :) Это же DWORD!

Да. I - DWORD, но List.Count - Integer. Так что MaxInt+1 вариантов. :)

← →
Rouse_ © (2009-11-07 01:56) [86]

> но List.Count - Integer

Но все-же DWORD :)
Такша DWORD(List.Count - Integer) - больше чем у слона, между прочим ;)

← →
Германн © (2009-11-07 03:07) [87]

> Rouse_ © (07.11.09 01:56) [86]
>
>
> > но List.Count - Integer
>
> Но все-же DWORD :)
> Такша DWORD(List.Count - Integer) - больше чем у слона,
> между прочим ;)
>

Не понял.
DWORD(Integer) - больше чем у слона.
Именно в этом и суть. Ну уж в этом я хорошо разбираюсь. Но значение у реального List.Count могут быть в диапазоне 0..MaxInt.
Или ты "о вообще", а пример - "что первое пришло в голову"?

Тут как-то, кто-то пытался перебрать все 4 с хвостом миллиона вариантов.

← →
Inovet © (2009-11-07 03:11) [88]

> [87] Германн © (07.11.09 03:07)
> Но значение у реального List.Count могут быть в диапазоне
> 0..MaxInt

DWORD(List.Count - 1)
а "больше чем у слона" по количеству символов, см задание.

← →
Rouse_ © (2009-11-07 03:12) [89]

> Именно в этом и суть. Ну уж в этом я хорошо разбираюсь.
> Но значение у реального List.Count могут быть в диапазоне
> 0..MaxInt.

List.Count := 0; List.Count - 1 = -1 DWORD(List.Count - 1) = $FFFFFFFF $FFFFFFFF > MaxInt и даже чем MaxInt + 1

:)

← →
Германн © (2009-11-07 03:16) [90]

> Inovet © (07.11.09 03:11) [88]
>
> > [87] Германн © (07.11.09 03:07)
> > Но значение у реального List.Count могут быть в диапазоне
> > 0..MaxInt
>
> DWORD(List.Count - 1)
> а "больше чем у слона" по количеству символов, см задание.
>
>

Какое задание?

← →
Inovet © (2009-11-07 03:17) [91]

> [90] Германн © (07.11.09 03:16)
> Какое задание?

Эта... Мы в какой ветке?:) Первое вестимо.

← →
Inovet © (2009-11-07 03:19) [92]

> [91] Inovet © (07.11.09 03:17)
> Первое вестимо.

> [56] Ins © (05.11.09 22:43)
> http://forum.sources.ru/index.php?showtopic=286380

← →
Rouse_ © (2009-11-07 03:25) [93]

Данный флейм начался с 76-ого поста с последней строчки :)

← →
Германн © (2009-11-07 03:26) [94]

> Rouse_ © (07.11.09 03:12) [89]
>
>
> > Именно в этом и суть. Ну уж в этом я хорошо разбираюсь.
>
> > Но значение у реального List.Count могут быть в диапазоне
> > 0..MaxInt.
>
> List.Count := 0;
> List.Count - 1 = -1
> DWORD(List.Count - 1) = $FFFFFFFF
> $FFFFFFFF > MaxInt и даже чем MaxInt + 1
>
>

Ну блин. Саш, я от тебя этого не ожидал!
...
Ты озвучил геморрой в Rouse_ © (06.11.09 22:46) [80]
Я с геморроем согласился. Но со смайликом в Германн © (06.11.09 23:00) [81]

И тут ты мне объясняешь...
Мне что - задать новую тестовую задачу на "Исходниках"?

← →
Rouse_ © (2009-11-07 03:28) [95]

> Германн © (07.11.09 03:26) [94]
> Ну блин. Саш, я от тебя этого не ожидал!

А чего я сразу - я смайлик не разглядел :) Мои пардоны :)

← →
Rouse_ © (2009-11-07 03:34) [96]

кстати

var A: Integer; begin A := 10; if not A in [1, 2] then A := 3 else A := 4; writeln(A); end.

Что получится? :)

← →
Rouse_ © (2009-11-07 03:35) [97]

ЗЗЫ: это я по поводу новых задачек :)

← →
Германн © (2009-11-07 03:49) [98]

> Rouse_ © (07.11.09 03:34) [96]
>
> кстати
>

А вот это интересно.

← →
Ins © (2009-11-07 14:25) [99]

> Rouse_ © (07.11.09 03:34) [96]

Ты Григорьеву Антону для Квинтаны предложи, в самый раз задачка :)

← →
Наиль © (2009-11-08 00:23) [100]

> [96] Rouse_ © (07.11.09 03:34)

Если не было бы намёка на подвох, то подвоха не заметил бы.

← →
Омлет © (2009-11-08 00:33) [101]

> [96] Rouse_ © (07.11.09 03:34)
> Что получится?

Мдя. Порядок операций - злая штука.

← →
Romkin © (2009-11-09 09:48) [102]

Если в if два и больше оператора и нет скобок - скорее всего делается не то, что хотелось :)

← →
Демо © (2009-12-23 22:36) [103]

Кстати, сегодня подведены итоги конкурса.
Если кому интересны решения задач, то все решения конкурсных заданий выложены.

← →
Petr V. Abramov © (2009-12-23 22:49) [104]

> Первое место - дистрибутив Windows Vista Home Premium (Russian).

у кого под ней заработает, тому и приз :)

← →
Игорь Шевченко © (2009-12-23 22:52) [105]

> Если кому интересны решения задач, то все решения конкурсных
> заданий выложены.

Работу с BITS стало быть, переть можно. Благодарствую

← →
AntonioBanderas (2009-12-23 23:04) [106]

Я пятнашки когда то писал, у меня есть шанс на победу???

← →
Демо © (2009-12-23 23:29) [107]

> AntonioBanderas (23.12.09 23:04) [106]
> Я пятнашки когда то писал, у меня есть шанс на победу???
>

А паззлы писал?

← →
KilkennyCat © (2009-12-23 23:33) [108]

Я шашки когда-то написал для искры-1256. Выиграть комп невозможно было - он себе лишние подрисовывал.
Так что, победитель - я, куда вам с пятнашками и паззлами

← →
AntonioBanderas (2009-12-23 23:47) [109]

> А паззлы писал?

не, а что? Могу под заказ

> AntonioBanderas (23.12.09 23:04) [106]
> Я пятнашки когда то писал, у меня есть шанс на победу???
>

> AntonioBanderas (23.12.09 23:47) [109]
> > А паззлы писал?не, а что?

Тогда шансов нет.

← →
AntonioBanderas (2009-12-23 23:56) [111]

> Игорь Шевченко © (23.12.09 22:52) [105]
>
>
> > Если кому интересны решения задач, то все решения конкурсных
> > заданий выложены.
>
>
> Работу с BITS стало быть, переть можно. Благодарствую

А ты не спешишь спереть то, чего нету? :)

> Игорь Шевченко © (24.12.09 02:45) [114]
>
> Германн © (24.12.09 02:09) [113]
>
> Все есть, все сперто. Придет нужда, буду знать, куда глянуть.
>
>

Сходу не нашел "исходники" решений. Может плохо искал?

Рюкзак надо было главным призом делать, я б тогда поучавствовал. Первое место занять не проблема, а вот попасть специально на второе - в разы сложнее

> KilkennyCat © (24.12.09 06:26) [116]
>
> Рюкзак надо было главным призом делать, я б тогда поучавствовал.
> Первое место занять не проблема, а вот попасть специально
> на второе - в разы сложнее
>

Во-первых, Костя правильно пишется поучаствовал. А во-вторых где ты был раньше?!
Какой флуд был перед конкурсом по поводу второго места и рюкзака! (С пивом :)

> А во-вторых где ты был раньше?!

в офисе сидел. выпрашивал у делфи еще 30 дней триала.

> KilkennyCat © (24.12.09 06:40) [118]
>
>
> > А во-вторых где ты был раньше?!
>
> в офисе сидел. выпрашивал у делфи еще 30 дней триала.
>

<offtop>
Раз уж не спится, да и Костя упомянул про триал.

Как вам представляется солидная фирма, чьи сотрудники из техподдержки заявляют "Можете не покупать ПО. Используйте 30-ти дневную триал-версию? А после 30-ти дней просто переустановите ПО. И получите ещё 30-дней. И т.д."
Но это только ягодки.
Как вам представляется солидная фирма, когда вы звоните в техподдержку, просите соединить вас с конкретным сотрудником, а в ответ слышите, что соединить-то можно, но данный сотрудник в данный момент участвует в "мероприятии по поводу" ?
:)

> просто переустановите ПО.

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

Конкурс на Исходниках. С призами Найти похожие ветки