В матрице поменять местами строку с наименьшим элементом на строку с наибольшим элементом

В матрице поменять местами строку с наименьшим элементом на строку с наибольшим элементом.

Искал на форуме такую, но не нашел (только на С++), как в Паскале сделать?