|
Опять 385! Несуразности по версии tvv385 |
|
Опции темы |
25.12.2013, 22:10 | #11 |
Старожил
Регистрация: 24.01.2008
Сообщений: 2,854
|
Отчего-ж не моя-то - тока седня написал, спецом для Афы, таксказать...
PS можно было еще вложением эти 10 уровней сделать а не циклом, но боюсь тогда скобки совсем не сосчитает, а емакс упадет...
__________________
ничто так не останавливает буйный полет мысли, как pragma Ada83; ;) |
26.12.2013, 10:01 | #12 |
Сетевой эльф
Регистрация: 27.09.2007
Сообщений: 37,316
|
а че ни одной лямбды?
лиспа без лямбды - скобки на ветер
__________________
Магическое зеркало: видеть себя в других, видеть других в себе... Предпочитаю вежливость. |
26.12.2013, 14:25 | #13 | |
Шволочь. И провокатор.
Регистрация: 12.02.2006
Сообщений: 31,212
|
Цитата:
да простенькое alert(function(){return 'nah'}) уже более продвинуто чем скопижженное убожество.
__________________
... Survivors will be shot again. |
|
26.12.2013, 14:57 | #14 |
Старожил
Регистрация: 22.01.2008
Адрес: Санкт-Петербург
Сообщений: 8,775
|
Функция prog в лиспе = порнография. Тому, кто ей пользуется, нужен был бейсик, но он зачем то лисп использует в качестве ухудшенного его варианта.
Применялся в свое время еще и RLISP. Это язык со структурами данных от лиспа, но процедурный. Adabas на таком языке можно было программировать. Последний раз редактировалось Zab; 26.12.2013 в 15:18. |
26.12.2013, 17:54 | #15 | ||
Старожил
Регистрация: 24.01.2008
Сообщений: 2,854
|
Цитата:
(А потом я тебе то-же самое вложением с оптимизиацией сделаю, там будет уровней шт 100, в калаше кстати меньше патронов ) А то ишь разумничался... Цитата:
ну это на нем и сделано - а вы думали я буду скобочки пересчитывать? В исходной программе там вообще ни одной скобки нету... (кстати меня последняя время IDE почему-то раздражать стали - в far ковырять исходники и приятнее и быстрее получается) Vladimir PS бейсик потом не сможет такое сделать, в общем виде, без конкретных чисел - хотя согласен что компилировать можно было и в бейсик, но бейсик сделанный из лиспа покруче будет: скармливаем (a+b) ** 50; получаем ========== 50 49 48 2 47 3 46 4 A + 50*A *B + 1225*A *B + 19600*A *B + 230300*A *B + 2118760 45 5 44 6 43 7 42 8 *A *B + 15890700*A *B + 99884400*A *B + 536878650*A *B + 41 9 40 10 39 11 2505433700*A *B + 10272278170*A *B + 37353738800*A *B + 38 12 37 13 36 14 121399651100*A *B + 354860518600*A *B + 937845656300*A *B + 35 15 34 16 33 17 2250829575120*A *B + 4923689695575*A *B + 9847379391150*A *B 32 18 31 19 + 18053528883775*A *B + 30405943383200*A *B + 47129212243960* 30 20 29 21 28 22 A *B + 67327446062800*A *B + 88749815264600*A *B + 27 23 26 24 108043253365600*A *B + 121548660036300*A *B + 126410606437752* 25 25 24 26 23 27 A *B + 121548660036300*A *B + 108043253365600*A *B + 22 28 21 29 20 88749815264600*A *B + 67327446062800*A *B + 47129212243960*A * 30 19 31 18 32 B + 30405943383200*A *B + 18053528883775*A *B + 9847379391150 17 33 16 34 15 35 *A *B + 4923689695575*A *B + 2250829575120*A *B + 14 36 13 37 12 38 937845656300*A *B + 354860518600*A *B + 121399651100*A *B + 11 39 10 40 9 41 37353738800*A *B + 10272278170*A *B + 2505433700*A *B + 8 42 7 43 6 44 5 45 536878650*A *B + 99884400*A *B + 15890700*A *B + 2118760*A *B 4 46 3 47 2 48 49 50 + 230300*A *B + 19600*A *B + 1225*A *B + 50*A*B + B ========= либо сказать "on fort; " - и получить то-же в виде готовой программе на фортране - дальше можно отдать дебилам готовый код, пусть декомпилят и скобки считают (ну это будет в след. серии - пусть Афа сперва скобки в своем конфиге пересчитает ) ANS1=47129212243960.*A**20*B**30+30405943383200.*A ** . 19*B**31+18053528883775.*A**18*B**32+9847379391150 .* . A**17*B**33+4923689695575.*A**16*B**34+ . 2250829575120.*A**15*B**35+937845656300.*A**14*B** 36+ . 354860518600.*A**13*B**37+121399651100.*A**12*B**3 8+ . 37353738800.*A**11*B**39+10272278170.*A**10*B**40+ . 2505433700.*A**9*B**41+536878650.*A**8*B**42+ . 99884400.*A**7*B**43+15890700.*A**6*B**44+2118760. *A . **5*B**45+230300.*A**4*B**46+19600.*A**3*B**47+122 5. . *A**2*B**48+50.*A*B**49+B**50 ANS=A**50+50.*A**49*B+1225.*A**48*B**2+19600.*A**4 7*B . **3+230300.*A**46*B**4+2118760.*A**45*B**5+1589070 0. . *A**44*B**6+99884400.*A**43*B**7+536878650.*A**42* B . **8+2505433700.*A**41*B**9+10272278170.*A**40*B**1 0+ . 37353738800.*A**39*B**11+121399651100.*A**38*B**12 + . 354860518600.*A**37*B**13+937845656300.*A**36*B**1 4+ . 2250829575120.*A**35*B**15+4923689695575.*A**34*B* *16 . +9847379391150.*A**33*B**17+18053528883775.*A**32* B . **18+30405943383200.*A**31*B**19+47129212243960.*A ** . 30*B**20+67327446062800.*A**29*B**21+8874981526460 0. . *A**28*B**22+108043253365600.*A**27*B**23+ . 121548660036300.*A**26*B**24+126410606437752.*A**2 5*B . **25+121548660036300.*A**24*B**26+108043253365600. *A . **23*B**27+88749815264600.*A**22*B**28+ . 67327446062800.*A**21*B**29+ANS1
__________________
ничто так не останавливает буйный полет мысли, как pragma Ada83; ;) |
||
26.12.2013, 18:18 | #16 |
Шволочь. И провокатор.
Регистрация: 12.02.2006
Сообщений: 31,212
|
ну я так и понял, что кроме скобочек ничего т и нет.
__________________
... Survivors will be shot again. |