//FPC 2.6.4
var n, sum, i: longint;
begin
readln (n, sum);
for i:=0 to n-1 do sum:=sum-i*2;
sum:=sum div n;
for i:=0 to n-1 do write (sum+i*2, ' ');
end.
// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var n := ReadInteger;
var a := ReadArrInteger(n);
var n2 := n div 2;
(a[:n2].Reverse + a[n2:].Reverse).Println
end.
110011 = 51(10)
111 = 21(10)
35 = 29(10)
1B = 27(10)
Самой большое число 110011
Картинка длжна быть в папке с программой и быть в формате BMP