Примеры быдлокода, или как не нужно писать программы

[JUDAS]

Здравствуйте уважаемые форумчане.
Просьба в этой теме постить примеры типичного "быдло" и "говно" кода на любом языке программирования.
Тему создал для начинающих и опытных программистов с целью показать, как не нужно программировать.
с уважением

Delphi 7, пример формирования строки текущего момента времени

 var
   Year, Month, Day, Hour, Min, Sec, Msec: Word;  
begin
...

  DecodeDate ( Date, Year, Month, Day );
  if Length ( IntToStr ( Day ) ) = 1 then
            sB := '0' + IntToStr ( Day )
  else
             sB := IntToStr ( Day );
  sSender := sB;
  DecodeTime ( Time, Hour, Min, Sec, Msec );
  if Length ( IntToStr ( Hour ) ) = 1 then
            sB := '0' + IntToStr ( Hour )
  else
            sB := IntToStr ( Hour );
  sSender := sSender + sB;
  if Length ( IntToStr ( Min ) ) = 1 then
            sB := '0' + IntToStr ( Min )
   else
            sB := IntToStr ( Min );
   sSender := sSender + sB + ' ' + sAut + CRLF;

аналог

 sSender := FormatDateTime('DDMMYYYYh24mmsszzz	', now);

Delphi7 пример работы с циклом

Label 
  obrabotka;
var 
   N : integer;
begin
  ....
  for N := 1 to Length(InputText) 
  do
     if ( ord ( InputText [ N ] ) =  13 ) or  ( ord ( InputText [ N ] ) =  10 ) 
       goto obrabotka;
    OutputText := OutputText +  InputText [ N ];
  end;
  
  obrabotka;
   .....

end;

[Вадим Мошев]

Для этого есть целый сайт: http://www.govnokod.ru/

[JUDAS]

>Для этого есть целый сайт

Сомневаюсь что новичики и программисты данного форума околачиваются на том сайте. Например я о нём узнал только что с ссылки

Вадим + 5 за ссылку. Уважаю.
Сам сайт на который ссылка - написана говнокодером.
Дизайн - 0, порядок - 0, стиль сообщения - 0, поиск - 0.

[type_Oleg]

А вот так здесь недавно считали дисперсию. Фрагмент шедевра

double  x[10]={1,4,6,14,5,-11,9,2,4,10};
double n=10, serx, dispersiax, otkl1, otkl2, otkl3, otkl4, otkl5, otkl6, otkl7, otkl8, otkl9, otkl10;
{
serx=(x[0]+x[1]+x[2]+x[3]+x[4]+x[5]+x[6]+x[7]+x[8]+x[9])/n;
otkl1=pow(x[0]-serx,2);
otkl2=pow(x[1]-serx,2);
otkl3=pow(x[2]-serx,2);
otkl4=pow(x[3]-serx,2);
otkl5=pow(x[4]-serx,2);
otkl6=pow(x[5]-serx,2);
otkl7=pow(x[6]-serx,2);
otkl8=pow(x[7]-serx,2);
otkl9=pow(x[8]-serx,2);
otkl10=pow(x[9]-serx,2);
dispersiax(otkl1+otkl2+otkl3+otkl4+otkl5+otkl6+otkl7+otkl8+otkl9+otkl10)/(n-1);
printf ("seredniex=%.5f\ndispersiax=%.5f",serx,dispersiax);
}

PS А может быть, если программирование уже искусство, то в нем появляется такой особый стиль, как нарочитая примитивность. Типа, как пирожки в поэзии.

[MaTBeu]

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

Сомневаюсь что новичики и программисты данного форума околачиваются на том сайте. Например я о нём узнал только что с ссылки

Вадим + 5 за ссылку. Уважаю.
Сам сайт на который ссылка - написана говнокодером.
Дизайн - 0, порядок - 0, стиль сообщения - 0, поиск - 0.

Ваше утонченное мнение в вопросах дизайна и информативности очень важно для нас. Только в следующий раз попробуйте троллить не так жирно.

[JUDAS]

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

Ваше утонченное мнение в вопросах дизайна и информативности очень важно для нас. Только в следующий раз попробуйте троллить не так жирно.

Уважаемый Матвей
Обосновываю свою "утончённость"
1. Где разделение говнокода на указанном ресурсе на языки программирования. Все слито в одну кучу и напоминает только одно место - помойку постов.

C++ (1651)  какой именно VisualC++  BorlaтdC++  протоС++(
Си (601)  какой именно , стандартный, Юникосвый  
Pascal (421) какой, Lasarus Турбо, Делфи, CodeGear ?
SQL (394)  то же
VisualBasic (118) то же
Assembler (63) то же

Уточняю.
Пост с кода который я привёл в этой теме 2-м сверху, для делфи является говнокодом, а для ТурбоПаскаля - нет

2. Как найти посты говнокода на тему циклы (for) или с наличием меток (label). Видимо местный программист, который писал код вышеуказаного сайта не знает или в меру своей высокой интеллектуальности не понимает, что сайт без поиска, что девушка без промежности.. или тут тоже у меня утончённое мнение ?
3. Порядок. Весь говнокод по конкретному языку слит в одну большую непрерывную .... личинку. Вы считаете такой стиль приемлемым для восприятия?

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

[ts-alan]

Сомневаюсь что новичики и программисты данного форума околачиваются на том сайте. Например я о нём узнал только что с ссылки

Вадим + 5 за ссылку. Уважаю.
Сам сайт на который ссылка - написана говнокодером.
Дизайн - 0, порядок - 0, стиль сообщения - 0, поиск - 0.

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

[JUDAS]

ts-alan, по ходу сайт не какая то мусорка на юкозе, а зарегистрирована на домене РУ и за него ежемесячно платятся деньги владельцем.
Суть в том, что он оформлен в виде говноресурса "двач" и служит для "общения" сброда троллей и малолетних "интеллектуалов".

[Аватар]

Не сомневаюсь, что тема в ближайшей перспективе будет закрыта. Поскольку сильно напоминает типичный вброс говна в вентилятор для инициализации холивара. ИМХО

[JUDAS]

Вброс это когда тема называется "Что лучше С++ или Паскаль", а тут только примеры быдлокода.