если честно то немного не пнятно...нас не учат использовать inc. я знаю что это позволяет увелить число на определенное значение. но поскольку мы этого не используем приходиться туго. допустип я нашла полож число, это if a[i,j] > 0 then, потом что? я дописываю k:=K+1;? и почему тогда на1 ...?