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
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
