- 1
- 2
- 3
- 4
- 5
- 6
<table width="500" height="10">
<td>
<br>
</tr>
</table>
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+132
<table width="500" height="10">
<td>
<br>
</tr>
</table>
Дипломная работа... no comments
+129
@echo off
if exist 3.txt del 3.txt
: begin
if "%1"=="" goto end
echo %1 >> 3.txt
copy 3.txt "%1" >4.txt
shift
goto begin
: end
dir *. /O-S /B
del *.
del 3.txt
del 4.txt
Batch файл под DOS, студенческое задание было: написать *.bat файл, который выводит список аргументов в обратном порядке, например, на команду foo.bat qwe sdf fgh ty должен быть ответ ty fgh sdf qwe. Как-то не додумался я прибавлять аргументы в обратном порядке. и придумал, как это сделать средствами бат файла.
+143
<img src="\rus\windows\internet-explorer\images\waterdrop_banner_887.jpg" height="380" width="958" />
Источник: http://www.microsoft.com/rus/windows/internet-explorer/welcome.aspx
Это полный комплект для интернета. Интернета, каким он нужен именно вам. Общение, информация и безопасность. Воспользуйтесь функциями Internet Explorer 8, чтобы создать свой интернет. ©
Сука.
+131
#include <default.inc>
var a:float=0.0;
var b:float=0.0;
var c:float=0.0;
var d:float=0.0;
var x1:float=0.0;
var x2:float=0.0;
::no
write 'Enter A: ';
in a;
write 'Enter B: ';
in b;
write 'Enter C: ';
in c;
write '$a*x^2+$b*x+c=0 [y/n]: ';
var s:string='';
string readline(s);
if eq(s, 'y') yes : no;
::yes
math d='b*b-4*a*c';
if eq(d, 0) dzero : dnzero;
if low(d, 0) dex;
::dzero
math x1='(-b)/(2*a)';
writeln 'X = $x1';
jump exit;
::dnzero
math x1='(-b+Math.sqrt(d))/(2*a)';
math x2='(-b-Math.sqrt(d))/(2*a)';
write 'X1 = $x1 X2 = $x2';
jump exit;
::dex
write 'Don`t exist!';
::exit
write 'Repeat? [y/n]';
string readline(s);
if eq(s, 'y') no;
write 'Bye!';
call readkey;
Программа развязывания квадратных уравнений на самодельном ЯП =)
Да, это не совсем ГК, но тем не менее смешно.
ЗЫ. В "default.inc" находятся ф-ции "write" и "readkey".
+121
<div onmouseover="this.style.cursor = 'pointer';" onmouseout="this.style.cursor = 'default';">
+130
//Сам скрипт
#!/bin/sh
cat /opt/chtag/truechars > /opt/chtag/tf
printf " $1@" >> /opt/chtag/tf
mp3info -p "%t" "$1">> /opt/chtag/tf
/opt/chtag/a.out < /opt/chtag/tf > /opt/chtag/t3
sh /opt/chtag/t3
//truechars
абвгдеёжзийклмнопрстуфхцчшщьыъэюяАБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЬЫЪЭЮЯ
//Исходники a.out
#include <iostream>
using namespace std;
int main()
{
int i,j;
string name,s,as="",truec;
cin >> truec;
cin >> s;
while(!cin.eof()) {as+=" "+s; cin >> s;}
name=as.substr(1,as.find("@",0)-1);
as=as.substr(as.find("'")+1);
for(i=0; i<truec.size(); i++)
{
if(as.find(truec[i],0)<truec.size())
{
cout << "printf \"" << name << " OK!\\n\"" << endl;
return 0;
}
}
cout << "printf \""<<name<<"\\'s tags will be changed...\\nBefore\\n\";\n"
"mp3info \""<< name << "\";\n"
"mid3iconv -e CP1251 -d --remove-v1 \""<< name << "\";\n"
"printf \"Now\\n\"\nmp3info \"" << name << "\""
<< endl;
return 0;
}
Вообще должен кодировку в русских тэгах в mp3 нормальной делать...
+137
function random return float is
variable X : float;
begin
return X;
end function random ;
Вот такую реализацию функции random посоветовали на одном VHDL форуме. :D
+144
if if = then then
then = else;
else else = if;
Следующий фрагмент вполне допустим при программировании на PL/1, но написать такое может только идиот со справкой. "Совершенный код" (c)
+143
!<>
Просто очень короткий говнокод:
Читается как не больше и не меньше.
Конечно, выдумано, но тем не менее :)
+133.8
Продолжение обсуждения Говнокод #3028
Предлагаю перейти сюда, а то каментов тонна.
Продолжение обсуждения Говнокод #3028
А то каментов скопилось.
Предлагаю премодерацию переложить на плечи тех, кто постит.
Выложил говно -- проследи, чтобы обсуждение было на уровне.
Отдельно на должности модеров, я думаю, народ не пойдет. Это отнимает много времени и сил.
Тем более ГдеЗдесьСиПлюсПлюсеры не дремлют.
Если постер будет излишне необъективен и будет выпиливать любую критику, то его ветка просто будет уныла.
Ведь при наличии хорошего диалога в каментах, даже из неоднозначного поста получается годная вещь.
Для гестов можно ввести ограничение по количеству каментов в сутки, следить по IP, хотя этот метод не лишен недостатков.
Или установить вырвиглазную капчу. Шутка. :))