Составьте программу вставки в массив a(n) пятого элемента, равного 8.

// PascalABC.NET 3.2, сборка 1382 от 06.02.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
  a:=a[0:4]+Arr(8)+a[4:]; a.Println
end.

Пример
n= 10
8 -62 30 -64 61 35 76 -5 -10 -95
8 -62 30 -64 8 61 35 76 -5 -10 -95

Оплата покупки в магазине, когда есть выбор оплаты - картой или наличными, если наличными то какими купюрами.
Задача подбора ноутбука по различным параметрам для покупки. Нужен такой то процессор, такая то видеокарта, но чтобы цена не превышала заданную.
Задача добраться до места назначения используя разветвленную сеть веток метро. Можно добраться разными маршрутами, нужно выбрать чтобы было меньше пересадок или меньше длинна пути чтоб была или как можно ближе к месту назначения чтобы выйти в итоге

Деление до конца без штрафов возможно, если количество орехов в кучке будет какой-либо степенью двойки (2, 4, 8, 16, 32, 64, 128, 256, 512). Число 769 - нечетно, следовательно, его можно представить <четное>+<нечетное>. При делении 768+1 получим первый штраф. Число 768 не является степенью двойки, поэтому необходимо опять поделить орехи на неравные кучки: 512+256 (второй штраф). 512 и 256 - степени двойки, значит дальнейшее разделение можно выполнить без штрафов.
Можно делить, например, так:
1. 512 и 257 орехов (штраф 1 рубль)
2. 257 делим на 2 кучки: 256 и 1 (штраф 1 рубль)
3 и все следующие операции: кучки из 512 и 256 орехов делим на равные кучки (512: 256 и 256, 256: 128 и 128, 128: 64 и 64, 64: 32 и 32, 32: 16 и 16 и т.д.).
Получаем, что минимальная сумма штрафа = 2 рубля.