Delphi. Составить программу - консольное приложение

Составить программу – консольное приложение Delphi.
Задание решить двумя способами:
1) с использованием подпрограммы-функции;
2) с использованием подпрограммы-процедуры;
В результате должно быть две программы.
Исходные данные вводятся с клавиатуры или получаются внутри программы с использованием генератора случайных чисел. Выбор способа получения исходных данных осуществляется с использованием меню после запуска программы на выполнение.
При демонстрации работы программы уметь объяснить, какой тип подпрограммы предпочтительнее использовать для решения данной задачи.
Результаты расчетов следует представить в наиболее наглядном виде.