Массив имеет четное число элементов.заполнить массив случайными числами и выполнить реверс отдельно в первой половине и во второй половине. пример: массив: 123 4 5 6 результат: 321 6 5 4

// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
  var n:=ReadInteger('n=');
  if n.IsOdd then Inc(n);
  var a:=ArrRandom(n,10,99); a.Println;
  a:=a[:n div 2].Reverse.Concat(a[n div 2:].Reverse).ToArray;
  a.Println
end.

Тестовое решение
n= 10
97 15 37 76 63 91 73 47 40 39
63 76 37 15 97 39 40 47 73 91

фон- основной цвет

ЭКОНОМИЧНОСТЬ — одна из основных составляющих успеха хозяйственной деятельности, суть которой заключается в разумной и рациональной экономии

ЭРГОНОМИКА-Научно-практическая дисциплина, изучающая трудовые процессы с целью создания оптимальных условий труда росту его производительности.

Программи́ст — специалист, занимающийся программированием, то есть созданием компьютерных программ.

Пользователь — лицо или организация, которое использует действующую систему для выполнения конкретной функции.

цвет-окраска

программа-Изложение содержания и цели деятельности политической партии, организации или отдельного деятеля.

дизайн-Художественное конструирование предметов быта, интерьеров, промышленных изделий и т. п.

проект-Разработанный план сооружения, устройства чего-н.

меню-Подбор кушаний, а также листок с перечнем их.

качество-Наличие существенных признаков, свойств, особенностей, отличающих один предмет или явление от других.

диалог-литературная или театральная форма устного или письменного обмена высказываниями между двумя и более людьми

интерфейс-граница между двумя функциональными объектами, требования к которой определяются стандартом;

звук-Воспринимаемое слухом физическое явление, порождаемое колебательными движениями частиц воздуха или другой среды.

{Дано двузначное число.
Определить:
а) является ли сумма его цифр двузначным числом;
б) больше ли числа а сумма его цифр}
var n, s : byte;
    a:integer;
begin
 writeln('введите двузначное число');
 readln(n);
{определение суммы цифр числа div - целая часть от деления, mod - остаток от деления}
 s:=n div 10 + n mod 10;
 writeln('сумма цмфр числ', n:5, 'равна',s:5);
 if s>9 then writeln('сумма цифр двузначное число', s)
  else writeln('сумма цифр не двузначное число', s);

 writeln('введите число а');
 readln(a);
 if s>a then writeln('сумма цифр', n,' больше ли числа ', a)
  else writeln('сумма цифр', n,' меньше числа ', a);

end.