код для транспортной задачи на PascalАВС методом минимальной стоимости

[Настёнок]

Имеется три поставщика А1, А2, А3 и пять потребителейВ1, В2, В3, В4, В5. Мощности поставщиков Аi и спросы потребителей Вj, а так же затраты на перевозку единицы груза от Аi поставщика к Вj потребителю сведены в таблицу поставок.
Потребители
Поставщики В1 В2 В3 В4 В5 Ресурсы поставщиков
А1 3 8 5 6 7 180
А2 5 3 6 8 7 160
А3 6 5 7 3 4 120
Спрос
потребителей 100 130 150 60 60


задачу я решила, а вот программу написать не могу