Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+87
public static int[] toArray(int i){
int[] arr = new int[new String(Integer.toString(i)).length()];
for(int j=0;j<new String(Integer.toString(i)).length();++j){
arr[j] = Integer.valueOf(new Character(new String(Integer.toString(i)).charAt(j)).toString());
}
return arr;
}Запись цифр числа в массив.
byob,
04 Октября 2011
+87
return (o1.isRecomend()? "true":"false").compareTo(o2.isRecomend() ? "true" : "false");
elfenit,
26 Августа 2011
+87
Boolean.valueOf("1".equals(object[1].toString())?"true":"false"))
madhead,
18 Июня 2011
+87
((JButton) ((JPanel) ((JTabbedPane) jp.getComponent(1)).getComponent(2)).getComponent(1)).setEnabled(false);
((JButton) ((JPanel) ((JTabbedPane) jp.getComponent(1)).getComponent(2)).getComponent(2)).setEnabled(false);
((JScrollPane) ((JPanel) ((JTabbedPane) jp.getComponent(1)).getComponent(2)).getComponent(0)).getViewport().getComponent(0).setEnabled(false);В этом коде кнопки делаются не активными.
Alias,
10 Июня 2011
+87
procedure TForm1.Edit1Change(Sender: TObject);
begin
if Edit1.Text='515' then
Form1.Caption:='Пароль взломан!'
else Form1.Caption:='неправельно!';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:='1';
if Edit1.Text='1' then
begin
if Form1.Caption='неправельно!' then
Edit1.Text:='2';
if Edit1.Text='2' then
begin
if Form1.Caption='неправельно!' then
Edit1.Text:='3';Личинка человека решила сделать брутфорс паролей. Когда нажимается кнопка идёт беспощадный перебор без цикла на предмет совпадения пароля
memnek,
23 Мая 2011
+87
// очистка stringGrid1
for q:= 0 to stringgrid1.RowCount do
for qq:= 0 to stringgrid1.colCount do
stringgrid1.cells[qq,q]:='';
//********"Отличный" способ очистить огромную таблицу.
black_dez,
26 Апреля 2011
+87
class PartStack {
...
if (children[i] instanceof EditorSashContainer && !(this instanceof EditorStack)) {
...
}
...
}
class EditorStack extends PartStack { ... }
интересно смотрится сторка номер 3
исходники Eclipse
tir,
11 Февраля 2011
+87
var
s:string;
function f(s:string):string;
var
i:integer;
s1:string;
begin
s1:=#13#10's:=''';
for i:=1to length(s)do begin
if s[i]=#13then
s1:=s1+'''#13#10+'#13#10+''''
else if s[i]=''''then
s1:=s1+''''''
else if s[i]<>#10 then
s1:=s1+s[i];
f:=s1+''';'#13#10+
's:=s+f(s);'#13#10+
'write(s);'#13#10+
'close(output);'#13#10+
'end.';
end;
end;
begin
assign(output,'s.txt');
rewrite(output);
s:='var'#13#10+
's:string;'#13#10+
'function f(s:string):string;'#13#10+
'var'#13#10+
'i:integer;'#13#10+
's1:string;'#13#10+
'begin'#13#10+
's1:=#13#10''s:='''''';'#13#10+
'for i:=1to length(s)do begin'#13#10+
'if s[i]=#13then'#13#10+
's1:=s1+''''''#13#10+''#13#10+'''''''''#13#10+
'else if s[i]=''''''''then'#13#10+
's1:=s1+'''''''''''''#13#10+
'else if s[i]<>#10 then'#13#10+
's1:=s1+s[i];'#13#10+
'f:=s1+'''''';''#13#10+'#13#10+
'''s:=s+f(s);''#13#10+'#13#10+
'''write(s);''#13#10+'#13#10+
'''close(output);''#13#10+'#13#10+
'''end.'';'#13#10+
'end;'#13#10+
'end;'#13#10+
'begin'#13#10+
'assign(output,''s.txt'');'#13#10+
'rewrite(output);';
s:=s+f(s);
write(s);
close(output);
end.Нарыл свой высер на тему программы, выводящей свой текст.
TarasB,
23 Октября 2010
+87
/**
* The Time class is a faster replacement for the java.util.Calendar and
* java.util.GregorianCalendar classes. An instance of the Time class represents
* a moment in time, specified with second precision. It is modelled after
* struct tm, and in fact, uses struct tm to implement most of the
* functionality.
*/
public class Time {
...
/**
* Year. TBD. Is this years since 1900 like in struct tm?
*/
public int year;
...
}Android 1.5. TBD в публичном API официального SDK - это пять. Ну мы ещё подумаем, как нам нравится, а вы пока просто посмотрите в дебаге! Гы.
yvu,
07 Июля 2010
+87
program lab_16;
{$APPTYPE CONSOLE}
uses
windows,
SysUtils;
{#1. Дана строка, содержащая русский текст.
Если в тексте нет слов-палиндромов длиной более 1-й буквы,
то вывести слова текста в соответствии с убыванием количества согласных,
в противном случае пpодублиpовать в словах текста гласные буквы и вывести
полученные слова в поpядке, обpатном к алфавитному.}
const nmax=100;
Alf = ['А'..'Я','а'..'я'];
rulett3 = ['А', 'Е', 'Ё', 'И', 'О', 'У', 'Ы', 'Э', 'Ю', 'Я', 'а', 'е', 'ё', 'и', 'о', 'у', 'ы', 'э', 'ю', 'я'];
type Mas_slov=array[1..nmax] of string;
procedure vvod(var a : Mas_slov; var n : integer);
var stroka,str:string;
i : integer;
begin
reset(input,'input.txt');
read(stroka);
str:='';
n:=0;
stroka:=stroka+' ';
for i:=1 to length(stroka) do
if stroka[i] in Alf then str:=str+stroka[i]
else if str<>'' then begin
inc(n);
a[n]:=str;
str:='';
end;
end;
function kolsog(x:string):integer; {фунция нахождения кол-ва согл букв}
var k,j,z:integer;
begin
z:=0;
for k:=1 to length(x) do
if not (x[k] in rulett3) then inc(z);
kolsog:=z;
end;
function palin(x:string):boolean; {проверка на палиндром}
var z,i:integer;
begin
palin:=false;
z:=0;
for i:=1 to length(x) do
if x[i]=x[length(x)+1-i] then z:=z+1;
if z=length(x) then palin:=true;
end;
function prov(a : Mas_slov; n : integer):boolean;
var i,j:integer;
begin
prov:=false;
for i:=1 to n do
if (length(a[i])>1) and (palin(a[i])=true) then prov:=true;
end;
procedure sort(var a:mas_slov; n: integer);
var i,j:integer;
st:string;
begin
for i:=1 to n-1 do
for j:=i+1 to n do
if kolsog(a[i])< kolsog(a[j]) then
begin st:=a[i]; a[i]:=a[j]; a[j]:=st; end;
end;
function dubl(x:string):string; {дублирование гласных букв}
var q:integer;
begin
q:=1;
while q<>length(x)+1 do begin
if (x[q] in rulett3) then begin Insert(x[q],x,q); inc(q,2)end else inc(q); end;
dubl:=x;
end;
procedure dubl2(var a:mas_slov; n:integer);
var i:integer;
begin
for i:=1 to n do
a[i]:=dubl(a[i]);
end;
procedure sort2(var a:mas_slov; n: integer);
var i,j:integer;
st:string;
begin
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]<a[j] then
begin st:=a[i]; a[i]:=a[j]; a[j]:=st; end;
end;
basic,
14 Июня 2010
Follow us!