1. Список говнокодов пользователя Сан Саныч

    Всего: 4

  2. Pascal / Говнокод #2300

    −96

    1. 1
    2. 2
    {//}l:= a+sqrt(b); 
{//}r:= c+sqrt(d);

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

    Сан Саныч, 19 Декабря 2009

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

  3. Pascal / Говнокод #2113

    +96.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
    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
    temp:= min(Mon.VGA,Comp.VGA);
inc(n,temp);
dec(Mon.VGA,temp);
dec(Comp.VGA,temp);
temp:= min(Mon.DVI,Comp.DVI);
inc(n,temp);
dec(Mon.DVI,temp);
dec(Comp.DVI,temp);
temp:= min(Mon.Multi,Comp.Multi);
inc(n,temp);
dec(Mon.Multi,temp);
dec(Comp.Multi,temp);
if Mon.Multi<>0
 then
  begin
  temp:= min(Mon.Multi,Comp.VGA);
  inc(n,temp);
  dec(Mon.Multi,temp);
  dec(Comp.VGA,temp);
  temp:= min(Mon.Multi,Comp.DVI);
  inc(n,temp);
  dec(Mon.Multi,temp);
  dec(Comp.DVI,temp);
  end;
if Comp.Multi<>0
 then
  begin
  temp:= min(Mon.VGA,Comp.Multi);
  inc(n,temp);
  dec(Mon.VGA,temp);
  dec(Comp.Multi,temp);
  temp:= min(Mon.DVI,Comp.Multi);
  inc(n,temp);
  dec(Mon.DVI,temp);
  dec(Comp.Multi,temp);
  end;

    Из ещё одного решения олимпиадной задачи. Вроде подсчитывает количество компов, которые можно собрать при учёте, что у системников и мониторов может быть интерфейс DVI, VGA или оба сразу (Multi).

    Сан Саныч, 09 Ноября 2009

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

  4. Pascal / Говнокод #1935

    +107.9

    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
    if l<9
 then
  if r<10
   then
    s:= inttostr(l)
   else
    s:= '10'
 else
  if l<99
   then
    if r<100
     then
      s:= inttostr(l)
     else
      s:= '100'
   else
    if l<999
     then
      if r<1000
       then
        s:= inttostr(l)
       else
        s:= '1000'
     else
      if l<9999
       then
        if r<10000
         then
          s:= inttostr(l)
         else
          s:= '10000'
       else
        if l<99999
         then
          if r<100000
           then
            s:= inttostr(l)
           else
            s:= '100000'
         else
          if l<999999
           then
            if r<1000000
             then
              s:= inttostr(l)
             else
              s:= '1000000'
           else
            if l<9999999
             then
              if r<10000000
               then
                s:= inttostr(l)
               else
              s:= '10000000'
             else
              if l<99999999
               then
                if r<100000000
                 then
                  s:= inttostr(l)
                 else
                  s:= '100000000'
               else
                if l<999999999
                 then
                  if r<1000000000
                   then
                    s:= inttostr(l)
                   else
                    s:= '1000000000';

    Нашёл в своём решении какой-то олимпиадной задачи. Долго пытался вспомнить, в каком состоянии был...

    Сан Саныч, 05 Октября 2009

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

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

    +66.8

    1. 1
    bind "attack" kill

    Классика консоли CS

    Сан Саныч, 24 Сентября 2009

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