- 1
while (r == BigInteger.ONE.subtract(BigInteger.ONE)) {...}
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+85
while (r == BigInteger.ONE.subtract(BigInteger.ONE)) {...}
брутальный 0 и не менее брутальное сравнение объектов...
+85
if( str.substring(0,3).equals("110")){
//restarting client
c.close();
Thread.sleep(100);
main(args);
System.gc();
System.exit(1);
}
Brutal restart
+85
А я люблю вставлять в свои проекты несвежий говнокод и потом с ним ебатся.
Каждый день я лажу по Сети и сохраняю на черную флешку все говнокоды которые вижу.
Потом распечатываю. На два полных листка целый день уходит.
Зато, когда после тяжёлого дня я прихожу домой, иду на говнокод,
жму Наговнокодить!...ммм и постю туда свое сокровище. И говнокодю, представляя,
что меня поглотил единый организм говнокод.
Мне вообще кажется, что авторы говнокодов, не умеют думать.
Не рефакторите их, не удаляйте, лучше приютите их на Говнокоде, говорите о них,
обсуждайте их.... А вчера приснился чудный сон, как будто я зашел в проект,и он
прератился в говнокод, классы, переменные, методы, все - говнокод, даже С++, даже Страйкер!
#define pi 3.14159265;
author= (c) pi+vo[1];
как-то седня скучно на говнокоде - его полностью окупировало похапе
вношу свежую струю
+85
program Project2;
{$APPTYPE CONSOLE}
{#1.Ввести последовательность натуральных чисел. Если в последовательности есть
простые числа, упорядочить последовательность по неубыванию суммы цифр.
В противном случае удалить из последовательности числа с нечетным количеством
цифр и продублировать 4-хзначные числа. Последовательность хранить в
односвязном списке. Перед завершением программы очистить динамическую память с
помощью процедуры Dispose.}
uses
SysUtils;
type
adres=^Element;
element=
RECORD
body:integer; next:adres; end;
Var n,i:integer;
dub,nov,t,first,p,p0:adres;
pred:adres;
a:integer;
pr:boolean;
function sum(a:integer):integer;
var i,s:integer;
begin
s:=0;
while a<>0 do begin
inc(s,a mod 10);
a:=a div 10;
end;
sum:=s;
end;
function prostoe(a:integer):boolean;
var i:integer;
p:boolean;
begin
a:=abs(a);
p:=true;
for i:=2 to trunc(sqrt(a)) do
if a mod i=0 then begin p:=false; break; end;
prostoe:=p;
if a=1 then prostoe:=false;
end;
BEGIN
pr:=false;
reset(input,'input.txt');
rewrite(output,'output.txt');
first:=NIL;
while not seekeof do begin
read(a);
new(p);
p^.body:=a;
if first=nil then first:=p else p0^.next:=p;
p0:=p;
end;
p:=first;
while p<>nil do begin
if prostoe(p^.body) then pr:=true;
p:=p^.next;
end;
if not pr then begin
p:=first;
if (length(inttostr(p.body)) mod 2<>0) then first:=p.next;
p:=first;
while p<>nil do
begin
if (p.next <> nil) and (length(inttostr(p.next^.body)) mod 2<>0) then
begin
T:=p.next;
p.next:=T.next;
Dispose(T);
end
else p:=p.next;
end;
p:=first;
while p<>nil do
begin
if (p <> nil) and (length(inttostr(p.body))=4) then
begin
new(dub);
dub.body:=p.body;
dub.next:=p.next;
p.next:=dub;
p:=p.next.next;
end
+85
destructor TKLCWinFrame.Destroy;
begin
asm
nop;
end;
inherited;
end;
+85
pocedure TForm1.line(x, y, N: integer; l: real; d: boolean);
var
x1,x2,x3,x4,y1,y2,y3,y4: integer;
begin
if l>2 then
begin
if d then
case N of
1: begin
x1:=x; y1:=y;
x2:=x1; y2:=y1-round(1);
x3:=x1+round(1); y3:=y1-round(1);
x4:=x1+round(1); y4:=y1;
end;
2: begin
x2:=x; y2:=y;
x1:=x2; y1:=y2+round(1);
x3:=x2+Round(1); y3:=y2;
x4:=x2+Round(1); y4:=y2+round(1);
end;
3: begin
x3:=x; y3:=y;
x1:=x3-round(1); y1:=y3+round(1);
x2:=x3-round(1); y2:=y3;
x4:=x2+round(1); y4:=y2+round(1);
end;
4: begin
x4:=x; y4:=y;
x1:=x4-round(1); y1:=y4;
x2:=x4-round(1); y2:=y4-round(1);
x3:=x4; y3:=y4-round(1);
end;
end
else
case N of
1: begin
x1:=x; y1:=y;
x2:=x1; y2:=y1+round(1);
x3:=x1+round(1); y3:=y1+round(1);
x4:=x1+round(1); y4:=y1;
end;
2: begin
x2:=x; y2:=y;
x1:=x2; y1:=y2-round(1);
x3:=x2-Round(1); y3:=y2;
x4:=x2-Round(1); y4:=y2-round(1);
end;
3: begin
x3:=x; y3:=y;
x1:=x3+round(1); y1:=y3-round(1);
x2:=x3+round(1); y2:=y3;
x4:=x2-round(1); y4:=y2-round(1);
end;
4: begin
x4:=x; y4:=y;
x1:=x4+round(1); y1:=y4;
x2:=x4+round(1); y2:=y4+round(1);
x3:=x4; y3:=y4+round(1);
end;
end;
with Canvas do
begin
Pen.Color :=RGB(Random(256),Random(256),Random(256));
MoveTo(x1,y1);
LineTo(x2,y2);
LineTo(x3,y3);
LineTo(x4,y4);
LineTo(x1,y1);
Brush.Color:=Pen.Color;
FloodFill((x2+x3) div 2, (y2+y1) div 2, Pen.Color,fsBorder);
if l=200 then line (x1,y1,1,1/2, not d);
if n<>1 then line (x1,y1,1,1/2, not d);
if n<>2 then line (x2,y2,2,1/2, not d);
if n<>3 then line (x3,y3,3,1/2, not d);
угадайте...:D
+84.7
const
found=true;
false=true;
//лжи нет, да будет только правда....
.....
препод долго немог понять как программа вообще работает
%DarkSvesh
+84.7
01001000 01100001 01110000 01110000 01111001 00100000 01010000 01110010 01101111 01100111 01110010 01100001 01101101 01101101 01100101 01110010 00100111 01110011 00100000 01000100 01100001 01111001 00100001
01001101 01100001 01101011 01100101 00100000 01100111 01101111 01101111 01100100 00100000 01100011 01101111 01100100 01100101 00101100 00100000 01101110 01101111 01110100 00100000 01110111 01100001 01110010 00100001 00100000 00111011 00101001
13/09/2009
gratz!
+84.4
public class Pair
{
private Object first;
private Object second;
private Object third;
public Pair() { }
public Pair( Object first, Object second, Object third )
{
this.first = first;
this.second = second;
this.third = third;
}
public Object getFirst() { return first; }
public Object getSecond() { return second; }
public Object getThird() { return third; }
public void setFirst( Object first ) { this.first = first; }
public void setSecond( Object second ) { this.second = second; }
public void setThird( Object third ) { this.third = third; }
}
Что-то здесь не так...
+84
public static int getNumber() {
try {
return 7;
} finally {
return 43;
}
}
Оказывается так делать можно...