Есть массив, состоящий из N целых чисел, но значения элементов вам неизвестны. Ваша задача найти эти элементы по заданному значению минимального элемента и разности между соседними элементами.

// PascalABC.NET 3.3, сборка 1599 от 17.12.2017// Внимание! Если программа не работает, обновите версию!begin  var n:=ReadlnInteger;  var a0:=ReadlnInteger;  var d:=ReadArrInteger(n-1);  Print(a0);  for var i:=0 to d.Length-1 do begin    a0:=a0+d[i]; Print(a0)    end;end.Пример511 2 -1 21 2 4 3 5