Помогите пожалуйста с такой задачкой:
TYPE ТОЧКА=ARRAY[(X,Y)] OF REAL;
VAR M:ARRAY[1..40] OF ТОЧКА; D:REAL;
Рассматривая элементы массива M как координаты точек на плоскости, найти D - наибольшее расстояние между этими точками.
http://forum.pascal.net.ru/index.php?showtopic=19856&hl=