Решить задачу на языке Pascal. С пояснением. Задача средней сложности

Задача
Завод выпускает 20 наименований продукции. Общее число работников завода — 100 человек. Известны фамилии работников, степень участия каждого работника в выпуске того или иного вида продукции (1 — принимает участие, 0 — не принимает участие), а также их месячная зарплата. Также известен доход, который приносит каждый вид продукции. Расставить фамилии работников в порядке их “ценности” для предприятия. Ценность работника определяется отношением общего дохода всех видов продукции, выпускаемой при его участии, к его зарплате. Таким образом, задачу можно было бы сформулировать и по-другому: напечатать список претендентов на увольнение с завода
Задачу нужно решить с использованием двумерного массива.
В задаче используется: модули, и решать через процедуру.