Программирование (Delphi)

Ввести два массива через процедуры ввода и вывода, написать функцию поиска минимума в каждом из них, написать функцию, которая считает сумму всех элементов массива, начиная с номера минимального, и если минимальное последним стоит, то должно прийти сообщение об этом. Вывести два массива, минимальное число и сумму элементов, начиная с минимального.
(Код, программа, скриншоты)