Turbopascal создать программу, которая выводит на экран значение a[1..10]

Чтобы решить эту нам нужно научиться определять, куда выгодно сесть бабочке. представим, что столбов 10, тогда бабочки сидят на столбах 1, 9, 10. бабочка, что справа летит на столб между 1 и 9 а именно на 5ый((9-1-1)/2+1 = 4,5, но число столбов нечетное, пожтому мы округляем до большего) разберёмся с тем, как мы получили число пять, составив формулу. чтобы узнать, число, находящееся между двумя числами, надо из максимального вычесть минимальное и ещё 1, затем разделить на 2 и прибавить меньшее число. если ответ получается дробным, то округляем в большую сторону, а если целым, то надо учитывать сторону, с которой совершается ход. (s-f-1)/2+f+d f - первое число s - второе число d - если число целое, то смотрим, с какой стороны летит бабочка. если справа, то = 0, если слева, то = 1, в остальных случаях (когда нечетн.) = 0. теперь к самому решению. нам надо, чтобы ходов было как можно больше, столбы, оказавшиеся с краю от крайних бабочек - выбывают из игры, а значит, что за первый ход нам надо избавиться от минимального количества столбов, тогда выберем такое расположение: 1 2017 2018. начинает бабочка справа. 1 ход: 1 1008 2017 2 ход: 1008 1513 2017 3 ход: 1008 1260 1513 4 ход: 1260 1387 1513 5 ход: 1260 1323 1387 6 ход: 1323 1355 1387 7 ход: 1323 1339 1355 8 ход: 1339 1347 1355 9 ход: 1339 1343 1347 10 ход: 1343 1345 1347 11 ход: 1343 1344 1345 ответ: 11 ходов.

1> 15    1)+1  2)+2    3)+4 1  начало 2  1+1                            1 3  1+2; 2+1                    2 4  3+1; 2+2                    3 5  1+4; 3+2; 4+1          6 6  5+1; 4+2; 2+4            10 7  6+1; 5+2; 3+4            18 8  7+1; 6+2; 4+4            31 9  8+1; 7+2; 5+4            55 10 9+1; 8+2; 6+4            96 11 10+1; 9+2; 7+4            169 12  11+1; 10+2; 8+4      296 13 12+1; 11+2; 9+4        520 14 13+1; 12+2; 10+4      912 15 14+1; 13+3; 11+4    1601          ответ 1601