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

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

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

1. PHP (5703)
2. C++ (2740)
3. Куча (2341)
4. JavaScript (2030)
5. C# (1930)
6. Java (1503)
7. Си (1103)
8. Pascal (649)
9. Python (585)
10. 1C (536)
11. SQL (434)
12. ActionScript (294)
13. Objective C (204)
14. bash (200)
15. Perl (196)
16. Assembler (148)
17. Ruby (144)
18. VisualBasic (140)
19. Lua (51)
20. Go (32)
21. Swift (29)
22. Haskell (28)
23. Kotlin (15)

1. PHP / Говнокод #12158

   +46

   1. 1

   for($i=0;$i<=100;$i++)echo(!$i?$i:($i%3==0&&$i%5==0?'FizzBuzz':($i%3==0?'Fizz':($i%5==0?'Buzz':$i)))).'<br>';

   FizzBuzz - мое решение.

   Запостил: pkot, 20 Ноября 2012

   Tweet

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

   • bormand 20.11.2012 18:36 # +3

     Напишите программу, которая выводит на экран числа от 1 до 100. При этом вместо чисел, кратных трем, программа должна выводить слово «Fizz», а вместо чисел, кратных пяти — слово «Buzz». Если число кратно и 3, и 5, то программа должна выводить слово «FizzBuzz»
     
     1) Нахрена тут 0?
     2) Ноль как бы делится на 3 и на 5, поэтому вместо него надо FizzBuzz.
     3) Я бы на месте HR послал пишущего в таком стиле куда подальше.

     Ответить

     • Darkling 06.02.2017 13:24 # 0

       А теперь предположим, что нам нужно найти сумму всех удовлетворяющих условию (n % 3 == 0 || n % 5 == 0) элементов.

       Ответить

       • bormand 06.02.2017 16:53 # 0

         Элементарно: таких чисел бесконечно много, т.е. ответ - бесконечность.

         Ответить

         • Darkling 06.02.2017 16:55 # 0

           Ну, с ограничительной планкой. Допустим от 1 до 10^9 максимум.

           Ответить

           • bormand 06.02.2017 17:07 # +2

             Ну тогда по формуле включений-исключений можно без цикла посчитать ;)

             Ответить

             • Darkling 06.02.2017 17:14 # 0

               Вообще решения уже есть и они довольно линейны. Питоново (t - количество тестов):
               

               for t in range(int(input().strip())):
                   n = int(input())
                   n = n - 1
                   a = (3 * (n // 3) * (n // 3 + 1)) // 2
                   b = (5 * (n // 5) * (n // 5 + 1)) // 2
                   c = (15 * (n // 15) * (n // 15 + 1)) // 2
                   print(a + b - c)

               
               Время отработки: 710 мс на топ тесте.
               
               Крестово:
               

               #include <bits/stdc++.h>
               #include <iostream>
               #define gc(c) (c)=getchar_unlocked()
               using namespace std;
               
               void rui(unsigned int * x) {
                   *x = 0;
                   
                   for (char c = 0;;) {
                       gc(c);
                       if (c < '0' || c > '9') break;
                       (*x) = (*x) * 10 + (c - 0x30);
                   }
               }
               
               void rul(unsigned long * x) {
                   *x = 0L;
                   
                   for (char c = 0;;) {
                       gc(c);
                       if (c < '0' || c > '9') break;
                       (*x) = (*x) * 10 + (c - 0x30);
                   }
               }
               
               unsigned long long int them(unsigned long * n, int a) {
                   return ((((*n) - 1) / a) * (((*n) - 1) / a + 1) / 2) * a;
               }
               
               int main(){
                   unsigned int t, i; rui(&t);
                   unsigned long n; unsigned long long int result;
                   
                   for (i = 0; i < t; i++) {
                       rul(&n);
                       result = them(&n, 3) + them(&n, 5) - them(&n, 15);
                       cout << result << endl;
                   }
                   
                   return 0;
               }

               
               Время отработки: 120 мс на топ тесте.
               
               Беда в том, что у меня никак не получается правильно сократить формулу с трёх одинаковых расчётов до одного линейного уравнения. Возможно, конечно, мне следует не сокращать, а наоборот распаралелить некоторые вычисления, чтобы уменьшить время расчётов ещё немного, но я рукожоп, походу.
               
               Математически сведённая формула (7 * n * n + n - 8) / 30 даёт неверные результаты. Я не понимат. :с

               Ответить

               • bormand 06.02.2017 17:34 # +1

                 > Математически сведённая формула
                 Там же целочисленные деления. Нельзя взять и выкинуть floor.

                 Ответить

                 • Darkling 06.02.2017 17:51 # 0

                   Нельзя. Нужно взять и выкинуть лишние расхождения. хД
                   
                   Вот с формулой для этих расхождений у меня и проблемы.

                   Ответить

   • Vasiliy 20.11.2012 18:39 # −1

     хаскель в моей пышечке ?

     Ответить

     • Fai 20.11.2012 21:44 # +3

       Не гони. Вот хаскель:
       

       fizzBuzz x
       	| mod x 15 == 0 = "FizzBuzz"
       	| mod x 5  == 0 = "Buzz"
       	| mod x 3  == 0 = "Fizz"
       	| otherwise     = show x
       	
       main = forM_ [1..100] (putStrLn . fizzBuzz)

       Ответить

       • Vasiliy 20.11.2012 21:55 # −3

         какой то не правильный хаскель.

         Ответить

         • Fai 20.11.2012 22:43 # +2

           Решил показать слепцу "не правильный хакель":
           

           main = main' 1 where
           	main' n = do
           		(putStrLn . choose) (show n, "Fizz", "Buzz", "FizzBuzz", n)
           		if n < 100 then main' (succ n) else putStrLn "End!" 
           		where
           			choose (n0, n3, n5, n15, n) 
           				| mod n 3 == 0 && mod n 5 == 0 = n15
           				| mod n 5 == 0 = n5
           				| mod n 3 == 0 = n3
           				| True = n0

           Ответить

           • Fai 20.11.2012 23:37 # +2

             Окончательная версия монстра (на большее меня не хватит):
             

             main = main' 1 100 "Fizz" 3 "Buzz" 5 "End!\n" where
             	main' n to t1 m1 t2 m2 et = do
             		(putStr . (++"\n") . choose) (t1, m1, t2, m2, show n, n)
             		if n < to then main' (succ n) to t1 m1 t2 m2 et else putStr et
             		where
             			choose (r1, n1, r2, n2, r0, n)
             				| mod n (n1*n2) == 0 = r1 ++ r2
             				| mod n n1 == 0 = r1
             				| mod n n2 == 0 = r2
             				| True = r0

             Ответить

             • roman-kashitsyn 20.11.2012 23:56 # +3

               > на большее меня не хватит
               Можно нагородить гораздо больше, если приплести литералы Чёрча или числа Пеано

               http://tinyurl.com/3swhu

               Ответить

               • Fai 21.11.2012 01:34 # +1

                 Или если свою монаду запилить.

                 Ответить

             • Vasiliy 21.11.2012 10:22 # +6

               Вот это хаскель. смотришь и кроме if и then не хера не понятно.

               Ответить

               • Fai 21.11.2012 12:18 # +5

                 Зато автматом распараллеливается

                 Ответить

                 • LispGovno 21.11.2012 12:29 # 0

                   Если бы указали не зеленым, то заминусовал бы всеми виртуалами.
                   И это не смотря на то, что я этого никогда не делаю

                   Ответить

                   • Fai 21.11.2012 13:01 # 0

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

                     Ответить

       • bormand 20.11.2012 22:03 # +3

         > какой то не правильный хаскель.
         

         main=mapM_(\x->putStrLn$foldr(\(n,s)r->if mod x n==0 then s else r)(show x)[(15,"FizzBuzz"),(5,"Buzz"),(3,"Fizz")])[1..100]

         Ответить

         • Fai 20.11.2012 22:08 # +4

           Всё равно понятнее чем пхп.

           Ответить

           • inkanus-gray 21.11.2012 03:05 # +1

             Не скажите:

             $threes = implode('|', array_map('strval', range(0, 100, 3)));
             $func = function($i) use ($threes) {
             	$result = preg_filter("#^($threes)$#", 'Fizz', strval($i)); 
             	$result .= preg_filter('#^.*(0|5)$#', 'Buzz', strval($i));
             	$result .= empty($result) ? $i : '';
             	return $result;
             };
             echo implode('<br>', array_map($func, range(0, 100)));

             Тут всё понятно.

             Ответить

             • Fai 21.11.2012 04:34 # 0

               Мне непонятно:
               
               - implode
               - array_map
               - use ($threes)
               - preg_filter
               - .=
               
               ИМХО, самый читабельный вариант будет всегда с использованием пачки if-ов.

               Ответить

               • govnomonad 21.11.2012 12:14 # +3

                 >ИМХО, самый читабельный вариант будет всегда с использованием пачки if-ов.
                 man pattern-matching

                 Ответить

                 • Fai 21.11.2012 12:19 # +2

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

                   Ответить

               • roman-kashitsyn 21.11.2012 13:09 # 0

                 Что-то не как не соображу, как запилить экстракторы с дополнительным параметром, пока вот такой угар

                 http://ideone.com/nY1uhg

                 Ответить

                 • Fai 21.11.2012 13:14 # 0

                   Это же божественная инкарнация ООП.
                   
                   

                   class DividesBy(divisor: Int) {
                      ...
                   }

                   
                   
                   Это по-настоящему красивое, не перегруженное и понятное описание класса.
                   
                   После хаскеля буду смотреть скалу.

                   Ответить

                   • roman-kashitsyn 21.11.2012 14:50 # 0

                     > божественная инкарнация
                     Scriabin Symphony #3: Divine Poem

                     Ответить

   • inkanus-gray 20.11.2012 20:22 # +1

     Говно. Смотрите, как надо:

     $X = array('%d','Fizz','Buzz');
     $X[] = $X[1].$X[2];
     for($i=0;$i<=100;$i++)printf($X[(int)($i%3==0)+2*(int)($i%5==0)] . "<br>",$i);

     Ответить

     • inkanus-gray 20.11.2012 20:30 # 0

       А нет, извращенцы так не пишут. Вот так лучше:

       $func = function($i) {$X = array('%d','Fizz','Buzz'); $X[] = $X[1].$X[2]; return sprintf($X[(int)($i%3==0)+2*(int)($i%5==0)],$i); };
       foreach(array_map($func, range(0, 100)) as $v)echo $v."<br>";

       Ответить

       • inkanus-gray 20.11.2012 20:40 # +3

         Стоп. А зачем мне вообще цикл, когда есть implode?

         $func = function($i) {$X = array('%d','Fizz','Buzz'); $X[] = $X[1].$X[2]; return sprintf($X[(int)($i%3==0)+2*(int)($i%5==0)],$i); };
         echo implode('<br>', array_map($func, range(0, 100)));

         Ответить

   • guest 20.11.2012 20:35 # +3

     За мной следят!

     Ответить

   • zim 21.11.2012 13:15 # +3

     Fizzbuzz, решение для малого бизнеса.

     Ответить

   • bormand 21.11.2012 13:35 # +3

     FizzBuzz enterprise edition: http://ideone.com/upCQTI

     Ответить

     • Fai 21.11.2012 13:44 # +3

       Нужно больше паттернов. Добавь одиночку, строителей, все AsStringable засунь в объектный пул. Затем прикрути туда адаптер.
       
       А весь алгоритм изолируй в стратегию.

       Ответить

       • bormand 21.11.2012 13:48 # +2

         Обходить список конечно же нужно не циклом, а посетителем, а всю систему, для удобства, спрятать за фасадом.

         Ответить

         • Vasiliy 21.11.2012 13:58 # +2

           а для вывода использовать Наблюдатель

           Ответить

           • Fai 21.11.2012 14:16 # +1

             Обожаю паттерны.

             Ответить

     • Vasiliy 21.11.2012 14:22 # +1

       вместо фора нужен итератор

       Ответить

   • nicksevenfold 29.11.2012 15:14 # +1

     perl like

     Ответить

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

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

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

   Я, guest, находясь в здравом уме и твердой памяти, торжественно заявляю:

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

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

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