Pascal/Turbo Pascal - Encontrar Distancia entre dos coordenadas

Suponga que se tiene las coordenadas de 5 puntos en el planos cartesiano y se quiere encontrar la distamcia entre los dos puntos que mas lejos se en cunetren . los 5 puntos (absiza y ordenada) son leidos de un registros de un registro. imprima los puntos, las distancia entre los mismo y haga resaltar la mayoria distancia.

Y q llevas hecho?

Pues... así a priori, se me ocurre:

Haces un procedimiento que analice:
- Punto1 a los otros 4 puntos.
- Punto2 a los otros 3 puntos.
- Punto3 a los otros 2 puntos.
- Punto 4 al otro punto restante.

y que devuelva un entero.
Es decir: supongamos que tenemos 5 puntos con coordenas (0,0) , (1,6), (2,3), (5,7) y (15,12).

Análisis en PSEUDOCÓDIGO:
- Cojo punto 1: (0,0), con punto 2: (1,6). Me lo guardo suponiendo que es la mayor distancia. (1,6) p.e: 1+6 = 7 puntos.
- Cojo punto 1: (0,0), con punto 3: (2,3) = 5 puntos.
Comparo con el anterior, cómo 7>5, sigo almacenando el anterior.
- Cojo punto 1: (0,0), con punto 4: (5,7) = 12 puntos.
Comparo con el anterior, cómo 12>7,lo almaceno.
- Cojo punto 1: (0,0), con punto 5: (15,12) = 27 puntos.
Comparo con el anterior, cómo 27>12,lo almaceno.

Ahora cogemos el punto 2 y comparamos con los restantes.
Valor mayor por ahora es 27.
- Cojo punto 2: (1,6), con punto 3: (2,3) = 2 puntos.
Comparo con el anterior, es menor, lo descarto.
- Cojo punto 2: (1,6), con punto 4: (5,7) = 5 puntos.
Comparo con el anterior, es menor, lo descarto.
- Cojo punto 2: (1,6), con punto 5: (15,12) = 20 puntos.
Comparo con el anterior, es menor, lo descarto.

[...]
Hago lo mismo con el resto de puntos.