Двумерные массивы

[Oksik_]

Паскаль
1)Путём перестановки элементов квадратной вещественной матрицы добиться того, чтобы её максимальный элемент находился в левом верхнем углу, следующий по величине в позиции (2,2), следующий по величине в позиции (3,3), и т.д., заполнив таким образом всю главную диагональ. (Оформить в виде процедуры).
2) Найти номер первой из строк, не содержащих ни одного положительного элемента. (Оформить в виде ф-ии).

[Sciv]

Оформить в виде

Эво как! Еще и оформить?

Готовый решебник в отделе Фриланс, тут только подсказки Давайте код - объясним, где неправильно.