8 вариант. Задан массив М, состоящий из N целочисленных элементов. Упорядочить элементы таким образом, чтобы вначале располагались все положительные аргументы, а после них все отрицательные.
PASCAL ABC
Ответы
Ответ дал:
0
Ничего не сказано про нули, они будут выброшены.
// 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
// 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
Ответ дал:
0
не правильно
Ответ дал:
0
Условие соблюдено, ПаскальАБЦ, так что все выполнено.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад