В. гвоздики на прямой дощечке вбиты гвоздики. любые два гвоздика можно соединить ниточкой. требуется соединить какие-то пары гвоздиков ниточками

Question

Информатика: В. гвоздики на прямой дощечке вбиты гвоздики. любые два гвоздика можно соединить ниточкой. требуется соединить какие-то пары гвоздиков ниточками так, чтобы к каждому гвоздику была привязана хотя бы одна ниточка, а суммарная длина всех ниточек была минимальна. формат входного файла в первой строке входного файла input. in записано число n – количество гвоздиков (2 ≤ n ≤ 100). в следующей строке записано n чисел -координаты всех гвоздиков (неотрицательные целые числа,не превосходящие 10000). формат

Chakachoco · Answer

//PascalABC.NET версия 3.2, сборка 1389//Если программа не запускается, то обновите версиюbegin    var n := ReadInteger( n = );    var a := ReadArrInteger( Массив , n);    a.Sort;//    Println(a);        var b := ArrFill(n + 1, 0);    b[0] := 0;       b[1] := Maxint;       for var i := 2 to n do        b[i] := min(b[i - 1], b[i - 2]) + abs(a[i - 1] - a[i - 2]);      //    Println(b);    WriteLn(b[n]);end....

Популярные вопросы