Транспортная задача на Delphi или Lazarus, вариант номер 1, оформление не нужно, только код с комментами в коде