Фанкшн хелп ми

Помогите написать программу,Четыре точки заданы своими координатами Четыре
точки заданы своими
координатами
x={x1,x2,x3} ,y={y1,y2,y3} z={z1,z2,z3}, и p=
{p1,p2,p3}
.Выяснить какие из них находятся в минимальном расстоянии друг от друга, и
вывести значение этого расстояния.
Вычисление расстояния между точками
оформить в виде подпрограммы function. исходн. данные x=
{3,2;5;1,4},y={2,2;-4;3},z={-6,1;-3;1},p={2,7;1;-1}