// 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.
3 квітки з кожної сторони = 12 квіток
Іпо 4 кутам по 1 квітці, тобто 1 кутова квітка буде відноситись до кожної-стороні.
Я виклав своє рішення, але краще подумати самому
Программа и пример её работы - в прилагаемом файле.
Pascal abc.
Проверка
введите кол-во элементов массива
10
12 13 27 29 19 18 11 20 22 16
<span>сумма=187</span>
1. 9C
2. 44310
3. 19DE13770C
4. 100100101101100010110
5. 1C8
6. 124426
7. 44822+35094=79916 переведем в 16 систему. = 1382C