- 1
1Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−155
1Минимальная программа на 1С
+146
main(){}Минимальная программа на Си.
−117
/*Ахтунг! Содержит бубен*/
		public function ToDown():void
		{
			while (!downCollisionTest(figure))
			{
				figure.position.y++;
			}
			RedrawFigure();
			
			setTimeout(function():void{Down();}, 5);
		}
+136
(defparameter *pcl-files-map*
  '#(("introduction-why-lisp"
      "Введение: почему Lisp?" 
      "%D0%B2%D0%B2%D0%B5%D0%B4%D0%B5%D0%BD%D0%B8%D0%B5%D0%BF%D0%BE%D1%87%D0%B5%D0%BC%D1%83lisp") ; <- WTF???
    
     ("lather-rinse-repeat-a-tour-of-the-repl"
      "Намылить, смыть, повторить: знакомство с REPL"
      "%D1%82%D1%83%D1%80%D0%B2repl")   ; <- WTF???
      ;; ...
))
            Practical Common Lisp такой Practical.
https://github.com/archimag/rulisp/blob/master/src/pcl.lisp
Матёрые лисперы просветите, если я что-то не понимаю: неужели хранение ссылок в исходном коде в таком виде чем-то обосновано?
        
+162
void getway(stack <int> &s, const vector <int> &p, int v) {
    while(v != -1)
    {
        s.push(v);
        v = p[v];
    }
} void compose(int ** M1, int ** M2, int n, int **res) {
    int curs;
    for(int i = 0; i < n; ++i)
    {
        for(int j = 0; j < n; ++j)
        {
            curs = 0;
            for(int k = 0; k < n; ++k)
            {
                curs += M1[i][k] * M2[k][j];
            }
            res[i][j] = curs;
        }
    }
} int mindist(int from, int to) {
    if(from == to)
        return 0;
    int **res, **tmp;
    createMat(res, n);
    createMat(tmp, n);
    duplit(res, Matrix, n);
    for(int i = 1; i < n; ++i)
    {
        //show(res, n);
        if(res[from][to])
        {
            deleteMat(res, n);
            deleteMat(tmp, n);
            return i;
        }
        compose(res, Matrix, n, tmp);
        duplit(res, tmp, n);
    }
}
int main()
{
    fin.open("input.txt");
    stack <int> s1, s2;
    int d1, d2, min;
    fin >> n;
    createMat(Matrix, n);
    fillnill(Matrix, n);
    getGr(n, n);
    fin >> from >> to;
    --from;
    --to;
    min = mindist(from, to);
    //cerr << min << endl;
    d.resize(n);
    p.resize(n);
    used.assign(n, false);
    breadth();
    if(used[to])
    {
        d1 = d[to];
        getway(s1, p, to);
        swap(from, to);
        used.assign(n, false);
        d.assign(n, 0);
        p.assign(n, 0);
        bfs();
        d2 = d[to];
        if(d1 > min)
        {
            d1 = d2 / 0;
        }
        if(!d2 || d2 >= d1)
        {
            cout << d1 << endl;
            while(!s1.empty())
            {
                cout << (int(s1.top()) + 1) << " ";
                s1.pop();
            }
        }
        else
        {
            d1 = d2 / 0;
            getway(s2, p, to);
            cout << d2 << endl;
            while(!s2.empty())
            {
                cout << (int(s2.top()) + 1) << " ";
                s2.pop();
            }
        }
    }
    else
    {
        cout << -1 << endl;
    }
}поиск кратчайшего пути;-)
−109
SELECT 1 INTO iResult FROM dual;Oracle. Присвоение переменной iResult значения 1.
+145
КАК ВЫ ЗАЕБАЛИ, ЁБ ВАШУ МАТЬ, КАЖДЫЕ ДВА ДНЯ ГОВНОКОД ПРО ЭТУ ХУЙНЮ. ВСЕ ДАВНО ВЫЯСНИЛИ, ЧТО ЭТО ВСЁ БРЕД БЫДЛОКОДЕРА-ПТУШНИКА. ИДИ НА ХУЙ, ТУПОЙ МУДАК.
+145
[www.opennet.ru]
Роб Пайк с прискорбием сообщил о смерти Денниса Ритчи, 
создателя языка Си и одного из ключевых разработчиков 
операционной системы UNIX. В последствие, Ритчи принимал 
участие в разработке ОС Inferno и Plan 9, а также языка Limbo. 
Ритчи умер дома, в возрасте 70 лет, после продолжительной болезни.
[/www.opennet.ru]
Прошу всех С-программистов почтить минутой молчания 
память великого программиста Денниса Ритчи.Печаль.
+146
public bool IsUnplugged
{
    get { throw new NotImplementedException(); }
}
public bool IsPlugged
{
    get { throw new NotImplementedException(); }
}
+132
http://mfrost.typepad.com/cute_overload/images/2008/10/05/my_little_batman_by_spippo.jpg