1. Pascal / Говнокод #2020

    −34.5

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    function IsTrue(Value: boolean): boolean;
    begin
     if Value <> true then result := false
     else if Value <> false then result := true
     else // внимание!
       result := (not true) and (not false);
    end;

    Запостил: jack128, 22 Октября 2009

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

    • а как узнать, что возвращает эта функция? IsTrue(IsTrue(IsTrue(IsGovnokod())))
      Ответить
    • лопата
      Ответить
    • неиллюзорный пиздец.
      Ответить
    • Фигня какая-то.
      Нафиг такое вообще кому-то писать?
      Ответить
    • Улыбнуло
      Ответить
    • сломали мозг
      Ответить
    • Лично я валялся на полу, но вообще понятно, что код написан специально, такое не напишешь сдуру =/
      Ответить
      • Ты идиот, не умеющий уловить ход мыслей другого человека.
        Автор всего лишь пытался реализовать тренарную проверку на истиность (true, false или unknown). Просто по глупости сделал это на базе всего одной булевой переменной. Рабочий код в его индусском исполнении мог выглядеть как-то так:

        function IsTrue(Value: byte): string[7];
        begin
        if Value = 0 then result := "false"
        else if Value = 1 then result := "true"
        else result := "unknown";
        end;
        Ответить
        • ага. Человек замыслил сделать конфетку, получилось, как обычно, говно, а идиот - тот, кто сказал, что говно - это говно а не конфетка.
          Браво
          Ответить
        • сцуко ну ты и оленевод бельдыев
          Ответить
        • ты бы этому ушлепку ещеб премию б дал
          Ответить
    • Спасибо, очень порадовали. Несмотря на нарочитость - не верю что такое можно написать по глупости, +
      Ответить
    • Кстати на PL/SQL - это вполне правильная процедура (если переписать по правилам синтаксиса PL/SQL ).
      IsTrue(NULL) вернет (not true) and (not false);
      Ответить
      • Да, кстати, может имелся ввиду NULL?

        Но вообще да, порадовало.
        Ответить
    • Я некогда подобное написал. Когда упрощал код, заменял переменные константами... Коллеги потом долго спрашивали "а зачем вот это?"
      Ответить
    • Что то я не курю.
      Ведь:
      Not True это False, а Not False это True. True and False это False :?
      Ответить
    • Не сработает. Переменная result не объявлена.
      Ответить
      • Объявлена. Так возвращается результат функции в Object Pascal
        Ответить
    • Lolwho
      я о том же. что может возвратить функция, если не true и не false?
      ввобще-то вопрос с подвохом. ели я не ошибаюсь, то ф-я не может возвратить другого значения кроме true или false. Или ещё что-то есть?
      ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
      Да не будет лжи!
      if false = false then false := true
      else
      false := true; :))))))))))))))))
      Ответить
    • однозначно говнокод.
      в "else // внимание!" попадет, если вызвать
      IsTrue(boolean(2)); // еще больший говнокод ;)
      Ответить
    • показать все, что скрытоvanished
      Ответить

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