Куча — Говнокод.ру

Куча / Говнокод #15461

+133

1

access denied for the user "King1986" with password "weakCocc".

Часть строки из лога. Логи пока общедоступны.

laMer007, 13 Марта 2014

Комментарии (11)

Куча / Говнокод #15433

+124

1
2
3
4
5
6

@set /p d=<%0
%d:~0,5%a=%d:~0,5%
%a%c=%d:~9,1%
%a%b%c%%d:~4,1%&%a%i%c%%d:~0,1%&%a%k%c%&%a%l%c%&%a%m%c%&%a%n%c%&%a%o%c%&%a%p%c%&%a%q%c%&%a%r%c%&%a%s%c%&%a%t%c%&%a%u%c%&%a%v%c%&%a%w%c%&%a%x%c%&%a%y%c%&%a%z%c%
%k%c%l%o%m%l%n%o%o%r%b%1%p%a%q%&%i%m%r%o%s%d%t%e%b%c%u%o%v%n%b%c%w%o%x%l%y%s%c%1%z%4%b%l%k%i%l%n%m%e%n%s%c%4%o%&%a%f%c%п%p%&%a%g%c%«%q%&%a%h%c%Ѓ%r%&%a%j%c%Д%s%&%a%e%c%!%t%&%u%t%v%i%w%t%x%l%y%e%b%.
%i%e%k%c%t%h%s%o%b%%b%Ъ%j%%j%%j%%j%%j%%j%%j%%j%%j%ї%r%&%i%e%q%c%p%h%o%o%b%%b%і%b%%b%%h%%g%%f%%b%%e%%b%%b%і%n%&%i%e%m%c%l%h%k%o%b%%b%А%j%%j%%j%%j%%j%%j%%j%%j%%j%Щ%b%&%v%p%o%a%y%u%x%s%p%e%u%>%q%n%k%u%m%l%o%

Должно быть запущено на русскоязычной Windows, сохраните в .bat файл, а на концах строчек (6 строк) не должно быть лишних пробелов!

Ссылка на зипованную версию:
http://klimaleksus.narod.ru/Files/C/fuck.zip

aleksusklim, 11 Марта 2014

Комментарии (9)

Куча / Говнокод #15397

+130

1

DECLARE (A, B INIT ((5)0,(5)1)) DIM (0:9) FLOAT;

LispGovno, 08 Марта 2014

Комментарии (23)

Куча / Говнокод #15380

+127

1

unfoldr (\b -> fmap (const . (second $ drop 1) . break (==' ') $ b) . listToMaybe $ b)

LispGovno, 07 Марта 2014

Комментарии (11)

Куча / Говнокод #15377

+126

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23

check =: 3 : 0
a=.>;:y
b=.|:(6,#y) $,'(){}[]'=/a
b=.(-1 3 5{"(1)b) (1 3 5)}"(1) b
c=.|:(3 2$i.6)([:+/[{[:|:])"(1 _) b
no=._1
n=.#c
p=. 13 : 'I.*./"(1)(1 _1)="(1)(2+\(x{y))'
while. n~:no do.
no=.n
cc =. |:c
d=.~.(0 p cc),(1 p cc),(2 p cc)
c=.((i.#c)-.(d,>:d)){c
n=.#c
end.
n=0
)

samples =: '({[{}]{}[]})';'({}}{[{}]{}[]})';'({[{}]{}[]}';'({[{}]{}]})';'({[{}{}[]})';'';'{}'

test =: 13 : 'check >y{samples'

test"(0) i.7

По мотивам http://govnokod.ru/15363

Abbath, 06 Марта 2014

Комментарии (3)

Куча / Говнокод #15362

+127

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

import Data.List
import Data.Maybe
checkBraces "" = True
checkBraces e = checkBrace e [] where
	openBraces = "({["
	closeBraces = ")}]"
	braceToBrace fromBraces toBraces brace = toBraces!!(fromJust $ elemIndex brace fromBraces)
	otcBrace = braceToBrace openBraces closeBraces
	checkBrace (c:e) s | elem c openBraces = checkBrace e ((otcBrace c):s)
	checkBrace (c:e) (h:s) | (elem c closeBraces) && (h==c) = checkBrace e s
	checkBrace (_:e) _ = False
	checkBrace [] [] = True
	checkBrace [] _ = False
main = mapM_ (print . checkBraces) bracesExpressionExamples where
	bracesExpressionExamples = 
		[
			"({[{}]{}[]})",
			"({}}{[{}]{}[]})",
			"({[{}]{}[]}",
			"({[{}]{}]})",
			"({[{}{}[]})",
			"",
			"{}"
		]

http://ideone.com/sZ9tiN
Кот с собеседований.
Проверка правильности расстановки скобок для каждого выражения из bracesExpressionExamples.

USB, 05 Марта 2014

Комментарии (5)

Куча / Говнокод #15286

+134

1
2

http://www.freepascal.ru/forum/viewtopic.php?t=9463&p=77107
ебаный пиздец.

ебаный пиздец.

Stertor, 02 Марта 2014

Комментарии (4)

Куча / Говнокод #15278

+124

1
2
3
4
5
6
7

http://www.youtube.com/watch?v=swAEcc9JX4Q

(автор пишет троян на дельфях, и комментирует)

убила фраза:

"...реестр[...]. Так как в линуксе все по-другому, Вы должны быть уверены, что ваша программа запускается на Windows"

убила фраза:

"...реестр[...]. Так как в линуксе все по-другому, Вы должны быть уверены, что ваша программа запускается на Windows"

Stertor, 01 Марта 2014

Комментарии (287)

Куча / Говнокод #15256

+86

01
02
03
04
05
06
07
08
09
10

load 'regex'
f=: 13 : '((+./-.(1 2 3 4{y))+.(0{y))*.(5{y)'
a =: #:i.2^6
b =: f"(1) a
cc =: ":|:(|:a),(|:b)
cc1 =: (32+i.32){cc
cc2 =: (i.32){cc
ccc=:|:(|:cc2),(1 32$'*'),(|:cc1)
ccc=:('\*';'&&') rxrplc"1 (ccc)
(,&'\\ \hline')"1 (' ';' & ')rxrplc"1 (ccc)

Вот он, первый говнокод на J

Abbath, 28 Февраля 2014

Комментарии (45)

Куча / Говнокод #15222