Question

На языке Pascal
Под б)
Спасибо

Answer 1

// PascalABC.NET 3.2, сборка 1338 от 16.11.2016
begin
  var n:=ReadInteger('Количество чисел в последовательности');
  var a2:=ReadArrReal('Вводите числа',n).Batch(n div 2).ToArray;
  a2[0].Interleave(a2[1].Reverse).Println
end.

Пример
Количество чисел в последовательности 6
Вводите числа 1.1 2.2 3.3 4.4 5.5 6.6
1.1 6.6 2.2 5.5 3.3 4.4