Код, который, заставляет задуматься...

[ds.Dante]

Всем программистам, и любителям брейнфака особенно, советую прочитать от корки до корки книгу Стива Макконелла - Совершенный код (Code Complete). Это книга, которую должен прочитать каждый программист. Почти имхо. Там помимо прочего описываются последствия такого кодирования.

Сообщение от AlDelta

препод сказал, что теперь надо переписать отчет с листингом от руки)).

Хорошая мысль. Если придется кого-то учить - буду заставлять переписывать листинги до тех пор, пока не перепишет без ошибок. :)

[Levsha100]

и любителям брейнфака особенно

Да ладно, я ведь, иногда , и нормальный код пишу )
Просто тогда я :
1)Спешил
2)Тупил
3)Знал, что забуду про эту прогу как про страшный сон
//-------------------------

БрейнФак?

Нет, я про ту строку

[pproger]

а меня в свое время очень сильно подвесил вот такой код

while ( i --> 0 ) {
...
}

просто смотрел и думал, что за стрелочка такая))
пс. говнокодом не считаю

[Greblin]

Да ладно, народ, что вы прям раскричались. Может это первое творение девушки, а вы так ругаете Я сам, когда гляжу на свои творения 5-летней давности, удивляюсь, через какое место надо было писать, чтоб получилось такое.
Если захочет, научится и будет писать нормально. А не захочет, ну будет у нас на одного экономиста больше

[Alex Cones]

у нас на одного экономиста больше

Главное, чтобы на врача не пошла.

Знал, что забуду про эту прогу как про страшный сон

БрейнФак?

[russian-stalker]

А я люблю расписывать код, славо богу в 2009 Delphi специально для меня сделали сворачивание функций в одну строчку.)))

[Вадим Буренков]

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

Weapon[PrWeapon].Ammo[Weapon[PrWeapon].AmmoIndex].Xpos:=Xpos+WeaponOffset[PrWeapon].X;

[russian-stalker]

Ну ваш код понятный и не сложный, у вас имеют "правильные" названия имена классов и переменных, которые в радость читать

[Alex Cones]

в 2009 Delphi специально для меня сделали сворачивание функций в одну строчку.)))

А можете скрин показать?

[ds.Dante]

Сообщение от Levsha100

if (startX+x<N)and(startY+y<N)and(startX+x>=0)and(startY+y>=0)and (((A[startX+1,startY]<>-3)and(A[startX+1,startY+1]<>-3))or((A[startX,startY+1]<>-3)and(A[startX,startY+2]<>-3))) then

У меня тоже такое было, когда делал в школе задачки на геометрию. Фактически - на аналитическую геометрию, только тогда я этого не знал. :)