ПОМОГИТЕ С ИНФОРМАТИКОЙ!!!!

[Keeper]

Ребят кто сможет помогите пожалуйста с информатикой, а точнее надо составить программку в среде Delphi, вот её условие:

  Заданы 3 массива: x={X1,X2,X3,X4}; y={Y1,Y2,Y3}; Z={Z1,Z2,Z3,Z4}. Упорядочить по возрастанию 3 числа a,b,c, где a-минимальный элемент массива X, b-минимальный элемент массива Y, c-минимальный элемент массива Z. Поиск минимального элемента массива оформить в виде подпрограммы.
 
 Кто сможет и для кого это не напряг помогите пожалуйста !!
                                            Зарание спасибо!