8 вариант. Задан массив М, состоящий из N целочисленных элементов. Упорядочить элементы таким образом, чтобы вначале располагались все положительные аргументы, а после них все отрицательные.PASCAL ABC
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
Не нашли ответ?
Похожие вопросы