Помогите написать псевдокод или программу на pascal(любой): заданы 4 точки:A,B,C,D,некоторые точки на прямой.надо отсортировать числа и определить расстояние между двумя самыми ближайшими точками

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 begin   Write('Введите значения для точек A,B,C,D: ');   var m:=ReadArrInteger(4).Sorted;   Print('Отсортированные:'); m.Println;   Writeln('Расстояние между ближайшими точками равно ',     m.Pairwise((x,y)->y-x).Min) end. Тестовое решение Введите значения для точек A,B,C,D: 25 13 5 31 Отсортированные: 5 13 25 31 Расстояние между ближайшими точками равно 6

прога в приложении==========