1. Список говнокодов пользователя Lioncure

    Всего: 1

  2. Pascal / Говнокод #7838

    +98

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    for j:=k+1 to n+1 do
	begin
	r:=a[j,k]/a[k,k];
	for i:=k to n do
                begin
                a[j,i]:=power(((a[j,i]-r*a[k,i]):a[i,j]),a[j,i]);
                end;

    К сожалению, я уже забыл, какой идентификатор что значит :(
    Придется переписывать.

    Lioncure, 12 Сентября 2011

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