1. Куча / Говнокод #3035

    +61.2

    1. 1
    border: yes!;

    найдено в css :-\

    guеst, 18 Апреля 2010

    Комментарии (16)

  2. Куча / Говнокод #3028

    +78.4

    Анонимус-срач на говнокод.ру

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

    striker, 17 Апреля 2010

    Комментарии (231)

  3. Куча / Говнокод #2987

    +130.8

    1. 1
    ^.*rutor\.org\/(?:(?:torrent)|(?:download))\/(\d*)\/?.*

    govnoacc, 11 Апреля 2010

    Комментарии (19)

  4. Куча / Говнокод #2962

    +143.8

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    CREATE TABLE EMP (EMPNO NUMBER(4) NOT NULL,
                  ENAME VARCHAR2(10),
                  JOB VARCHAR2(9),
                  MGR NUMBER(4),
                  HIREDATE DATE,
                  SAL NUMBER(7, 2),
                  COMM NUMBER(7, 2),
                  DEPTNO NUMBER(2));

INSERT INTO EMP VALUES (7369, 'SMITH', 'CLERK',    7902, TO_DATE('17-DEC-1980', 'DD-MON-YYYY'), 800, NULL, 20);
INSERT INTO EMP VALUES (7499, 'ALLEN', 'SALESMAN', 7698, TO_DATE('20-FEB-1981', 'DD-MON-YYYY'), 1600, 300, 30);
INSERT INTO EMP VALUES (7521, 'WARD',  'SALESMAN', 7698, TO_DATE('22-FEB-1981', 'DD-MON-YYYY'), 1250, 500, 30);
INSERT INTO EMP VALUES (7566, 'JONES', 'MANAGER',  7839, TO_DATE('2-APR-1981',  'DD-MON-YYYY'), 2975, NULL, 20);
INSERT INTO EMP VALUES (7654, 'MARTIN', 'SALESMAN', 7698,TO_DATE('28-SEP-1981', 'DD-MON-YYYY'), 1250, 1400, 30);
INSERT INTO EMP VALUES (7698, 'BLAKE', 'MANAGER', 7839,TO_DATE('1-MAY-1981', 'DD-MON-YYYY'), 2850, NULL, 30);
INSERT INTO EMP VALUES (7782, 'CLARK', 'MANAGER', 7839,TO_DATE('9-JUN-1981', 'DD-MON-YYYY'), 2450, NULL, 10);
INSERT INTO EMP VALUES (7788, 'SCOTT', 'ANALYST', 7566,TO_DATE('09-DEC-1982', 'DD-MON-YYYY'), 3000, NULL, 20);
INSERT INTO EMP VALUES (7839, 'KING', 'PRESIDENT', NULL,TO_DATE('17-NOV-1981', 'DD-MON-YYYY'), 5000, NULL, 10);
INSERT INTO EMP VALUES (7844, 'TURNER', 'SALESMAN', 7698,TO_DATE('8-SEP-1981', 'DD-MON-YYYY'), 1500, 0, 30);
INSERT INTO EMP VALUES (7876, 'ADAMS', 'CLERK', 7788,TO_DATE('12-JAN-1983', 'DD-MON-YYYY'), 1100, NULL, 20);
INSERT INTO EMP VALUES (7900, 'JAMES', 'CLERK', 7698,TO_DATE('3-DEC-1981', 'DD-MON-YYYY'), 950, NULL, 30);
INSERT INTO EMP VALUES (7902, 'FORD', 'ANALYST', 7566,TO_DATE('3-DEC-1981', 'DD-MON-YYYY'), 3000, NULL, 20);
INSERT INTO EMP VALUES (7934, 'MILLER', 'CLERK', 7782,TO_DATE('23-JAN-1982', 'DD-MON-YYYY'), 1300, NULL, 10);

prompt C R E A T E   N E W   E M P L O Y E E   R E C O R D
prompt
prompt Enter the employee's information:
prompt
accept l_ename char format a10 prompt 'Last name: '
accept l_empno number format '9999' prompt 'Employee #: '
accept l_sal number format '99999.99' prompt 'Salary [1000]: ' default '1000.00'
accept l_comm number format '99999.99' prompt 'Commission % [0]: ' default '0'
accept l_hired date format 'mm/dd/yyyy' prompt 'Hire date (mm/dd/yyyy): '

prompt List of available jobs:
select distinct job
  from emp
 order by job
/
accept l_job char format a9 prompt 'Job: '

prompt List of managers and employee numbers:
select empno, ename
  from emp
 order by ename
/
accept l_mgr number format '9999' prompt 'Manager''s Employee #: '

prompt List of department numbers and names:
select deptno, dname
  from dept
 order by deptno
/
accept l_dept number format '99' prompt 'Department #: '

insert into emp (empno, ename, job, mgr, hiredate, sal, comm, deptno)
values (&l_empno, '&l_ename', '&l_job', &l_mgr,
        to_date('&l_hired','mm/dd/yyyy'), &l_sal, &l_comm, &l_dept)
/

drop table emp;

    sergylens, 08 Апреля 2010

    Комментарии (4)

  5. Куча / Говнокод #2943

    +144.8

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    <table width="100%">
<tr>
	<td><input name="res" title="add new resource"/><td>
</tr>
</table>

    а ведь это должен был быть <div>..</div> =)

    cheef, 06 Апреля 2010

    Комментарии (12)

  6. Куча / Говнокод #2942

    +51.4

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    .....
<table width=100% border=1>
<colgroup .....>
.....
<tr>
  <td colspan=2>(тут шапка)</td>
</tr>
<tr>
  <td width=60% colspan>(слева)</td>
  <td width=40% colspan>(справа)</td>
</tr>
.....
</table> 
.....

    Нету раздела html, поэтому решил наговнокодить тут :) Будет ли это говнокодом если верстать сайты так? Вообщем за и против div'ой и табличной верстки.. примеры данного куска с оптимальным содержанием..

    antigovnokoder, 06 Апреля 2010

    Комментарии (98)

  7. Куча / Говнокод #2906

    +131.6

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    <div style="width:100%; text-align:center; height:95%; position: absolute ; left:0; top:0;  text-align:center;  "  >
      
      
            <table id="TableHead" cellpadding="0" cellspacing="0" style="text-align:center;width: 400px; margin-top:-150px; margin-left:-200px;    position:absolute; top: 50%; " align="center">

...
</div>

    ну не красотень

    alex_donetsk, 01 Апреля 2010

    Комментарии (5)

  8. Куча / Говнокод #2893

    +123.2

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    81. 81
    82. 82
    83. 83
    84. 84
    85. 85
    86. 86
    87. 87
    88. 88
    89. 89
    90. 90
    91. 91
    92. 92
    93. 93
    94. 94
    95. 95
    96. 96
    97. 97
    98. 98
    99. 99
    uses windos, crt;
label code1;
var start: char;
    pr: shortint;
    code: integer;
    z, k, p, c, x: longint;
    h, m, s, hund: word;
    st: string;
    i:comp;
function time(w : word) : string;
var s : string;
begin
 str(w:0, s);
 if length(s) = 1 then s:='0'+s;
 time:=s;
end;
procedure rdtsc(var tsc:comp); assembler;
asm
db $0f, $31
les di, tsc
mov [es:di+0], ax
db $66, $c1, $e8, $16
mov [es:di+2], ax
mov [es:di+4], dx
db $66, $c1, $ea, $16
mov [es:di+6], dx
end;
begin
textcolor(white);
write ('Start?(y/n) '); readln (start);
if start<>'y' then halt;
code1:
z:=14000005; c:=round(z/100); p:=c; pr:=0; k:=0; textcolor(10);
gettime(h, m, s, hund);
st:=time(h)+time(m)+time(s)+time(hund);
val(st, x, code);
        if code<>0 then
        begin
        clrscr;
        textcolor(12);
        writeln ('CODE=', code);
        writeln (h, m, s, hund);
        goto code1;
        end;
rdtsc(i); i:=i+x*41+x+5;

   while z<>k do
   begin
   str(i, st);
   st:=copy(st, 6, 4);
   val(st, i, code);
                if code<>0 then
                begin
                clrscr;
                textcolor(12);
                writeln ('CODE=', code);
                writeln ('ST=', st);
                goto code1;
                end;
   i:=i*i+h*104+hund*73+x;
                if i=0 then
                begin
                textcolor(12);
                writeln ('K=', k);
                delay(50000);
                goto code1;
                end;
   k:=k+1;
          if k=p then
          begin
          p:=p+c;
          pr:=pr+1;
          clrscr;
          writeln ('STATUS: ', pr, '%');
          end;
   end;
x:=round(i); textcolor(white); writeln ('Result X=', x); textcolor(yellow);
                  while x>=10 do
                  begin
                  str(x, st);
                  z:=length(st);
                  x:=0;
                       for k:=1 to z do
                       begin
                       start:=st[k];
                       val(start, pr, code);
                                  if code<>0 then
                                  begin
                                  clrscr;
                                  textcolor(12);
                                  writeln ('CODE=', code);
                                  write ('START=', start);
                                  goto code1;
                                  end;
                       x:=x+pr;
                       end;
                  end;
write ('Result=', x); readln
end.

    Генерация случайного числа от 1 до 9 на Turbo Pascal. Свистоперделки прилагаются. Спешите поблевать! Делал сам. Такое вот задание попалось мне в лаб. работе на 4-м курсе. Хотя паскаль изучал лишь в школе, позиция препода уникальна: "Вы должны уметь всё!", хотя дрочим лишь C#, Java и асм.

    killerman_yar, 29 Марта 2010

    Комментарии (8)

  9. Куча / Говнокод #2834

    +144.4

    1. 1
    array...

    Забавно перепутаны картинки и соответствующие им пакеты телевидения: кино, спорт, увлечения.
    На пакете телевидения "кино" изображена девушка спортсменка (видимо плавчиха).
    На пакете телевидения "спорт" изображен кулинар.
    На пакете телевидения "увлечения" изображен лев, который может съесть.
    )
    Источник: akado.tv

    Kraut, 21 Марта 2010

    Комментарии (4)

  10. Куча / Говнокод #2833

    +144.6

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    81. 81
    82. 82
    83. 83
    84. 84
    program stroki;

uses
  crt;

var
  S, ns: string[80];
  t, f, f1, kc, ks, d, i: byte;

const
  n = '1234567890';
  a = 'abcdefghijklmnopqrstuvwxyz';

begin
  kc := 0;
  ks := 0;
  
  clrscr;
  read(S);
  d := length(S);
  for i := 1 to d do
 begin
    t := pos(S[i], n);
    if t > 0 then
    begin
      ns := ns + S[i];
      f := 1;
    end
    else 
    begin
      if f = 1 then
        kc := kc + 1;
      f := 0;
      delete(ns, 1, length(ns));
    end
    end;
 
  
  f := 0;
  delete(ns, 1, length(ns));
  for i := 1 to d do
  begin
    t := pos(S[i], a);
    if t > 0 then
    begin
      ns := ns + S[i];
      f := 1;
    end
    else
    begin
      if f = 1 then
        ks := ks + 1;
      f := 0;
      delete(ns, 1, length(ns));
    end
  end;
  if (kc = 0) and (ks = 0) then
  begin
    clrscr;
    write('no symbols and digets');
    readkey;
  end; 
  if kc > ks then
  begin
    clrscr;
    write('a lot of digets');
    readkey;  
  end
  else
  begin
    clrscr;
    write('a lot of symbols');
    readkey;
  end;
  if kc = ks then
  begin
    clrscr;
    write('они равны');
    readkey;
  end
  
  
  
end.

    Funkie444, 21 Марта 2010

    Комментарии (6)