← All posts tagged быдлокод

CheshaNeko

Сейчас прислали код посмотреть, и вот что я в нем нашел.
( ∗процедура обмена переменных массива∗ )
procedure exch ( var a r : a r r ; a , b : integer ) ;
begin
a r [ a ] : = a r [ a]+ a r [ b ] ;
a r [ b ] : = a r [ a] − a r [ b ] ;
a r [ a ] : = a r [ a] − a r [ b ] ;
end ;

Это +1. Бомба замедленного механизма так сказать.