8вариант. задан массив м, состоящий из n целочисленных элементов. упорядочить элементы таким образом, чтобы вначале располагались все положительные аргументы, а после них все отрицательные. pascal abc

Ничего не сказано про нули, они будут выброшены.

// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
begin
  var m:=ArrRandom(ReadInteger('n='),-50,50).Println(', ');
  m.Where(x->x>0).Concat(m.Where(x->x<0)).Println(', ')
end.

Тестовое решение:
n= 10
24, -49, -48, -24, 0, 36, 27, 9, 43, -13
24, 36, 27, 9, 43, -49, -48, -24, -13