FLashM 2004-06-10 19:15:23
Всего постов: 437
Бород: 9
Рейтинг: +4|1|-3 = +51%
Одобрено: Дура
Прога на C

#include
main (int t, int _, char *a){return!0main(-86,0,a+1)+a)): 1,t<_ ? main(t+1,_,a):3,main(-94,-27+t,a)&&t==2\
?_<13?main(2,_+1,"%s %d %d\n"):9:16:t<0?t<-72?
main(_,t,"@n'+,#'/*s{}w+/w#cdnr/+,{}r/*de}+,/*{*+,/w{%+,/w#q#n+,/#{l+,/n\
{n+,/+#n+,/# ;#q#n+,/+k#;*+,/'r :'d*'3,}{w+K w'K:'+}e#';dq#'l q#'+d'K#!\
/+k#;q#'r}eKK#}w'r}eKK{nl]'/#;#q#n'){)#}w'){){nl]'/+#n';d}rw' i;# ){nl]!\
/n{n#'; r{#w'r nc{nl]'/#{l,+'K {rw' iK{;[{nl]'/w#q#n'wk nw' iwk{KK{nl]!/\
w{%'l##w#' i; :{nl]'/*{q#'ld;r'}{nlwb!/*de}'c ;;{nl'-{}rw]'/+,}##'*}\
#nc,',#nw]'/+kd'+e}+;#'rdq#w! nr'/ ') }+}{rl#'{n' ')# }'+}##(!!/")
:t<-50?_==*a?putchar(31[a]):
main(-65,_,a+1):
main((*a=='/')+t,_,a+1):
0:*a=='/'||main(0,main(-61,*a,
"!ek;dc i@bK'(q)-[w]*%n+r3#l,{}:\nuwloca-O;m .vpbks,fxntdCeghiry"
),a+1);
}
FLashM 2004-06-10 19:20:16 #
Один чел у нас ее даже расшифровал =)
astax 2004-06-10 23:13:27 #
Кто еще скажет что Perl неправильный язык? :)
FLashM 2004-06-11 01:57:00 #
Я скажу!

"Программы на С относительно плохо читаются. Лучше, чем на Perl, но хуже, чем на Pascal"(c)учебник =)))))))

Я верю, т.к. видел примеры прог на перле...
BlackboX 2004-06-11 02:19:46 #
это я расшифровал. трое суток, в сумме гигабайт листинга.

кстати, все это должно быть в одну строчку, а символы "/" надо убрать

тогда скомпилируется
astax 2004-06-11 10:11:41 #
>Я верю, т.к. видел примеры прог на перле...

Ну-ну, "видел примеры"... А я писал на перле, и даже написал довольно таки большую систему, которая сейчас успешно используется. И я бы не сказал, что код там плохо читается. Если можно написать программу не используя алфавитнах символов, это значит все будут так писать код.

Вот выше пример на С :)
astax 2004-06-11 10:16:41 #
А вообще, по-моему там в самом начале ошибка со скобочками -
(int t, int _, char *a){return!0main(-86,0,a+1)+a)):

одна открывающая и целых три закрывающих. Да и вообще return!0main (это ноль, а не буква O) - какая-то неправильная конструкция....
Дуро 2004-06-11 11:11:31 #
2astax : только твоя система тормозит безбожно ;)
MakZ 2004-06-11 11:18:45 #
это после моих оптимизаций %))
BlackboX 2004-06-14 06:53:14 #
вот ПРАВИЛЬНАЯ версия:



#include <stdio.h>

main (int t, int _, char *a){return!0<t?t<3?main(-79,-13,a+main(-87,1-_,main(-86,0,a+1)+a)): 1,t<_ ? main(t+1,_,a):3,main(-94,-27+t,a)&&t==2\?_<13?main(2,_+1,"%s %d %d\n"):9:16:t<0?t<-72?main(_,t,"@n'+,#'/*s{}w+/w#cdnr/+,{}r/*de}+,/*{*+,/w{%+,/w#q#n+,/#{l+,/n{n+,/+#n+,/# ;#q#n+,/+k#;*+,/'r :'d*'3,}{w+K w'K:'+}e#';dq#'l q#'+d'K#!/+k#;q#'r}eKK#}w'r}eKK{nl]'/#;#q#n'){)#}w'){){nl]'/+#n';d}rw' i;# ){nl]!/n{n#'; r{#w'r nc{nl]'/#{l,+'K {rw' iK{;[{nl]'/w#q#n'wk nw' iwk{KK{nl]!/w{%'l##w#' i; :{nl]'/*{q#'ld;r'}{nlwb!/*de}'c ;;{nl'-{}rw]'/+,}##'*}#nc,',#nw]'/+kd'+e}+;#'rdq#w! nr'/ ') }+}{rl#'{n' ')# }'+}##(!!/"):t<-50?_==*a?putchar(31[a]):

main(-65,_,a+1):

main((*a=='/')+t,_,a+1):

0<t?main(2,2,"%s")

:*a=='/'||main(0,main(-61,*a,

"!ek;dc i@bK'(q)-[w]*%n+r3#l,{}:\nuwloca-O;m .vpbks,fxntdCeghiry"

),a+1);

}



(все В ОДНУ СТРОКУ)
ХЗ кто 2004-12-10 12:11:57 #
Здрасти, а мона узнать шо це таке за коды и шо из них получаецца? :)

приколов.нет Байанометр СКОТОБАЗА АТАТАТ yaplakal.com
© СВАЛКА, 2003–2024. Авторы двиШка: megath[aka duro], skupr, спасибо MakZ'у за пинки ;), Methos'у за скин sandbox, Татьяне за синий скин, Сверстайго Сайтег за вебдванолизацию синего скина.
Также огромное спасибо всем, кто сюда что-то когда-то постил, и тем, кто постил тем, кто постил, а также - авторам )))