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

Question

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

Answer 1

// 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