1. Pascal / Говнокод #9266

    +94

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    for k:=1 to 5 do begin
new (z2);
z2^.pole1:=k;
z2^.pole2:=z1;
z1:=z2;
end;

for k:=1 to 5 do begin
z2^.pole3:=z1;
z1:=z2;
z2:=z2^.pole2;
end;

    Вот так в нашем универе учат создавать двунаправленые массивы. Код кстати не только принципиально индусский, но еще и не рабочий.

    Запостил: Tairesh, 31 Января 2012

    Комментарии (5) RSS

    Добавить комментарий