Говнокод: по колено в коде.

• Все
• Лучший
• Сток
• Глупый поиск
• Наговнокодить!
• Oтзывы

Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!

1. PHP (5710)
2. C++ (2742)
3. Куча (2391)
4. JavaScript (2034)
5. C# (1930)
6. Java (1503)
7. Си (1120)
8. Pascal (648)
9. Python (591)
10. 1C (540)
11. SQL (432)
12. ActionScript (292)
13. Objective C (202)
14. bash (200)
15. Perl (194)
16. Assembler (148)
17. Ruby (145)
18. VisualBasic (138)
19. Lua (49)
20. Haskell (43)
21. Go (31)
22. Swift (27)
23. Kotlin (14)

1. Haskell / Говнокод #29210

   0

   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

   (|     | (> (|(((() ()() (() () ()())) )(| 1.0) 3)
                 (loop for i from 0 to chunk-index
                       do (|     | (> (|()))))| |))(| i) 50)
                            (|     | (zerop (|))((())()()| i 3))
                              (|     | (|     | (> (|()))))| |)()))()(((!@#$%^&*())| (|))((())()()| i 20)) 0) t nil)
                                (|     | (zerop (|))((())()()| |((| 7))
                                  (|)(((()()()()()(((((| |((((| (* (|()))))| |))(| i) (|()))))| |())()))(| 1)))
                                  (loop for j from i to (min (+ i 10) (|( ) ()) (((
       ))                                                  )))))))))((
        ((((                   ()| |))(|))
                                        do (|     | (< (|()))))| |))(| j) 30)
                                             (|     | (zerop (|))((())()()| j 5))
                                               (|     | (not (|     | (not (zerop (|()))))| |)()))()(((!@#$%^&*())| (|))((())()()| j 15)))) t nil))
                                                 (|   ()))| |(((((| (/ (|()))))| |))(| j) (|()))))| |())()))(| 2)))
                                                 (loop for k from j to (min (+ j 5) (|( ) ()) (((
       ))                                                  )))))))))((
        ((((                   ()| |))(|))
                                                       do (|     | (> (|()))))| |))(| k) 70)
                                                            (|     | (zerop (|))((())()()| k 2))
                                                              (|     | (|     | (> (|))((())()()| k 25) 0) t nil)
                                                                (|)(((()()()()()(((((| |((((((| (* (|()))))| |())()))(| 3) (|()))))| |))(| k)))
                                                                (|)(((()()()()()(((((| |))))| (+ |((((| (- |(((((| |((((((|)))
                                                                (go :|()(|)))))))))))))))))
           (go :|(|)))
       :|()(|
         (|  ) () (())|
           (cond
             ((> |))))| 1000) (|)(((()()()()()(((((| |))))| (/ |))))| (|()))))| |())()))(| 4))))
             ((< |))))| 100) (|)(((()()()()()(((((| |))))| (* |))))| (|()))))| |())()))(| 5))))
             (t (|   ()))| |))))| (|()))))| |())()))(| 6))))
   
           (cond
             ((zerop (|))((())()()| |((| 11)) (|)(((()()()()()(((((| |))))| (expt |))))| 2)))
             ((zerop (|))((())()()| |((| 13)) (|)(((()()()()()(((((| |))))| (expt |))))| 0.5)))
             (t (|)(((()()()()()(((((| |))))| (|))()((| |))))|))))
   
           (return |))))|))
       :|(|
         (|  ) () (())|
           (|     | (>= chunk-index (|( ) ()) (((
       ))                                                  )))))))))((
        ((((                   ()| |))(|))
             (|     | (< |((| 3000)
               (|     | (> (|()))))| |((| 15) 0)
                 (|     | (zerop (|))((())()()| (|()))))| 1 (multiple-value-list (decode-universal-time (get-universal-time)))) 5))
                   (return (|()))))| |())()))(| 7))
                   (return (|()))))| |())()))(| 8)))
                 (return (|()))))| |())()))(| 9)))
               (return -1))
             (return -999)))))

   2 часть

   Запостил: lisp-worst-code, 07 Декабря 2025

   Tweet

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

   Добавить комментарий

   Ошибка компиляции комментария:

   1. Гости могут высказаться только в понедельник, среду, четверг или воскресение

   Семь раз отмерь — один отрежь, guest!

   А не использовать ли нам bbcode?

   • [b]жирный[/b] — жирный
   • [i]курсив[/i] — курсив
   • [u]подчеркнутый[/u] — подчеркнутый
   • [s]перечеркнутый[/s] — перечеркнутый
   • [blink]мигающий[/blink] — мигающий
   • [color=red]цвет[/color] — цвет (подробнее)
   • [size=20]размер[/size] — размер (подробнее)
   • [code=<language>]some code[/code] (подробнее)

   Проверочный код: *