Нашли или выдавили из себя код, который нельзя назвать нормальным,
на который без улыбки не взглянешь?
Не торопитесь его удалять или рефакторить, — запостите его на
говнокод.ру, посмеёмся вместе!
#!/usr/bin/guile -s
!#
(define (square x)
(* x x))
(define (square_sum x y)
(+ (square x) (square y)))
(define (tmax x y z)
(cond ((and (>= x y) (>= x z)) x)
((and (>= y x) (>= y z)) y)
(else z)))
(define (tms x y z)
((cond ((= (tmax x y z) x)
(if (> y z)
(square_sum x y)
(square_sum x z)))
((= (tmax x y z) y)
(if (> x z)
(square_sum x y)
(square_sum y z)))
((= (tmax x y z) z)
(if (> x y)
(square_sum x z)
(square_sum y z)))
(else 0))))
(display "Ans: ")
(display (tms 6 5 4))
(newline)
Можно и не сортировать весь список:
1. Найти наименьшее значение.
2. Посчитать сумму квадратов всех элементов.
3. Вычесть из суммы квадрат наименьшего.
Лолечка проходит SICP, причем гетеросексуальную версию, на лиспе (сейчас копрофаги переписали на какую-то перхоть, чуть ли не на джаваскрипт)
это похвально!!
Чувствуешь, как твой код реально представляет собой AST? Ощущаешь ли гомоиконность?
Прямоугольная сетка из кирпичиков микросхем — это прямо дух 80-х. Ещё в ту эпоху бывало, что для питания микросхем над платой крепили параллельные жестяные полоски, между которыми через определённые промежутки припаивали керамические конденсаторы для фильтрации радиопомех.
Ты прав. Объект и список из одного объекта — эти разные вещи. В питоне и прыщах от такого есть защита и нужно запятую лишнюю писать. Может быть в Лиспе так же?
Скриптопиздунишка в наш в оркестр пришел
Скриптопиздунишка нам пропаганду принес
Про то, как хорошо есть говно без проклятой статической типизации и компиляции
Про то, как хорошо всем,
А лучше всех ему -- счастливому скриптопиздунишке
Я не уверен, что они же, а не просто подгон с царского плеча теми, кто вынужден по каким-то причинам 10% рабочего проводить с питоном. "Они же" обычно пишут на го.
JloJle4Ka # 0
HoBorogHuu_nemyx # 0 ⇈
JloJle4Ka # 0 ⇈
Вот так:
https://sicp-solutions.net/post/sicp-solution-exercise-1-3/
HoBorogHuu_nemyx # 0
Т. е. (= (tmax x y z) x) может выдавать ложноотрицательный результат.
nyTuH # 0 ⇈
HoBorogHuu_nemyx # 0 ⇈
necKoB # 0 ⇈
guest # 0 ⇈
ISO # 0 ⇈
guest # 0 ⇈
Ее арестовали таки
guest # 0
JloJle4Ka # 0 ⇈
nyTuH # 0
HoBorogHuu_nemyx # 0 ⇈
iwasko # 0 ⇈
guest # 0 ⇈
Desktop # 0
necKoB # 0 ⇈
guest # 0 ⇈
Desktop # 0 ⇈
HoBorogHuu_nemyx # 0 ⇈
1. Найти наименьшее значение.
2. Посчитать сумму квадратов всех элементов.
3. Вычесть из суммы квадрат наименьшего.
JloJle4Ka # 0 ⇈
1. Найти наименьшее значение.
2. Посчитать сумму квадратов всех остальных элементов.
Desktop # 0 ⇈
JloJle4Ka # 0 ⇈
Плюс лисп можно компилировать.
Desktop # 0 ⇈
JloJle4Ka # 0 ⇈
guest # 0 ⇈
time покажи
JloJle4Ka # 0 ⇈
Desktop # 0 ⇈
https://govnokod.ru/26382#comment542845
JloJle4Ka # 0 ⇈
Если делать как там, то:
real - 0.013
user - 0.007
sys - 0.007
JloJle4Ka # 0 ⇈
[email protected] # 0 ⇈
JloJle4Ka # 0 ⇈
Desktop # 0 ⇈
guest # 0
это похвально!!
Чувствуешь, как твой код реально представляет собой AST? Ощущаешь ли гомоиконность?
JloJle4Ka # 0 ⇈
Нет.
> Ощущаешь ли гомоиконность?
Нет.
Зато ощущаю себя охуенным, т.к. написал функцию для подсчёта кубического корня.
Rooster # 0 ⇈
Desktop # 0 ⇈
Support # 0
Rooster # 0
JloJle4Ka # 0 ⇈
Rooster # 0
То ли дело:
guest # 0 ⇈
Rooster # 0 ⇈
Исправил:
Rooster # 0 ⇈
ISO # 0 ⇈
guest # 0 ⇈
HoBorogHuu_nemyx # 0 ⇈
guest # 0 ⇈
https://youtu.be/0CgafaxnQ9A
HoBorogHuu_nemyx # 0 ⇈
guest # 0 ⇈
хотя конечно никаких хардов там нет: там есть прошитый в ПЗУ ЯП и накопитель на магнитных дисках (А то и на аудиокассетах)
HoBorogHuu_nemyx # 0 ⇈
guest # 0 ⇈
https://gunkies.org/w/images/thumb/a/ae/IBM_5150_motherboard.jpg/400px-IBM_5150_motherboard.jpg
а потом пидорасы изобрели чипсет, и всё добро спрятали и стало скучно
HoBorogHuu_nemyx # 0 ⇈
HoBorogHuu_nemyx # 0 ⇈
guest # 0 ⇈
Rooster # 0 ⇈
guest # 0 ⇈
Rooster # 0 ⇈
guest # 0 ⇈
Rooster # 0 ⇈
guest # 0 ⇈
ISO # 0 ⇈
Они у тебя they/them?
Rooster # 0 ⇈
JloJle4Ka # 0 ⇈
Desktop # 0 ⇈
выйди и зайди нормально
Rooster # 0 ⇈
Desktop # 0 ⇈
Rooster # 0
HoBorogHuu_nemyx # 0 ⇈
Rooster # 0 ⇈
guest # 0 ⇈
Desktop # 0 ⇈
JloJle4Ka # 0 ⇈
Support # 0 ⇈
guest # 0
JloJle4Ka # 0 ⇈
guest # 0
Fike # 0 ⇈
o6AMa_4MO # 0 ⇈
https://d33wubrfki0l68.cloudfront.net/67f0a74f55b34de3cda797f8fdaceedad7a83fc2/908f1/img/esv43ww1uh-600.jpeg
С этим же все в порядке, не очень уклюжий креотифф
guest # 0
Скриптопиздунишки: пиздюнькают нам как прекрасно писать на скриптоговне без компиляции и стат типизации
Они же: переписывают свое говно на раст, и оно начинает работать в 10000 раз быстрее. https://twitter.com/charliermarsh/status/1613198373594578946?s=20&t=Ah1As1oS7sEyFP8OHLUlLg
Скриптопиздунишки пиздунишки
Скриптопиздунишки лицемеры
Никогда не верь скриптопиздунишкам
guest # 0 ⇈
Скриптопиздунишка нам пропаганду принес
Про то, как хорошо есть говно без проклятой статической типизации и компиляции
Про то, как хорошо всем,
А лучше всех ему -- счастливому скриптопиздунишке
Fike # 0 ⇈
Я не уверен, что они же, а не просто подгон с царского плеча теми, кто вынужден по каким-то причинам 10% рабочего проводить с питоном. "Они же" обычно пишут на го.
guest # 0 ⇈
Fike # 0 ⇈
Т.е. может он и питонист, но один-единственный такой питонист на все питонистическое коммьюнити
guest # 0 ⇈
Desktop # 0 ⇈
guest # 0
https://twitter.com/Zn_Portnova/status/1613175704895504384
Fike # 0 ⇈
guest # 0 ⇈