Сортировка массива в порядке возрастания модулей элементов

@Печальная_Особь · Регистрация: 03.11.2016

Author24 — интернет-сервис помощи студентам

Дан массив целых чисел. Выведите все элементы массива в порядке возрастания модулей элементов.

Даётся сначала число N - кол-во элементов в массиве. N <= 100. Далее через пробел записаны N чисел - элементы массива. Все числа по модулю не превосходят 10000.

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

Примеры:
Входной файл
3
1 -4 2

Выходной файл:
1 2 -4

@bormant · 06.01.2017, 11:42

Любой алгоритм сортировки. Для сравнения использовать

Pascal

function IsLess(a, b: Integer): Boolean;
begin
  IsLess:=(Abs(a)<Abs(b)) or (Abs(a)=Abs(b)) and (a<b);
end;

@Печальная_Особь 0 / 0 / 0 Регистрация: 03.11.2016 Сообщений: 11
		1
	Сортировка массива в порядке возрастания модулей элементов 23.11.2016, 13:02. Показов 2851. Ответов 1 Метки нет (Все метки) Дан массив целых чисел. Выведите все элементы массива в порядке возрастания модулей элементов. Даётся сначала число N - кол-во элементов в массиве. N <= 100. Далее через пробел записаны N чисел - элементы массива. Все числа по модулю не превосходят 10000. В случае равенства модулей сначала выводится отрицательные числа, затем положительные. Примеры: Входной файл 3 1 -4 2 Выходной файл: 1 2 -4 0

	06.01.2017, 11:42

Сортировка массива в порядке возрастания модулей элементов

Решение