Лабораторна робота з інформатики Delphi 7

Є лабораторна робота з інформатики, яку необхідно виконати в середовищі Delphi 7. Вона невелика, не складна, але в мене не виходить. Деталі у файлі "информатика", разом із умовою завдання. Моя вже написана попередньо програма з деякою частиною робочого коду в архіві. Потрібно подивитися саме друге завдання - оформити всі необхідні розрахунки так, щоб вони відбувалися в середовищі програми, а не екселю.