Ко всем нулевым элементам массива прибавить число n, ко всем отрицательным элементам прибавить число k

@gggf · Регистрация: 01.12.2019

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

Дан массив целых чисел в диапазоне от -10000 до 10000. Ко всем нулевым элементам массива прибавить число n, ко всем отрицательным элементам прибавит число k, из положительных элементов вычтет число m. Числа n, k, m лежат в пределах от -10000 до 10000.

Формат ввода:

В первой строке - количество элементов массива не превосходящее 100. На второй строке через пробел элементы массива. На третьей строке числа n, k, m записанные через пробел.

Формат вывода:

Элементы отсортированного массива на одной строке через пробел.

Пример входных данных

5
4 0 -5 1 -2
2 3 4
Пример выходных данных

0 2 -2 -3 1

@JuriiMW · 04.02.2020, 04:15

Pascal

begin
  var a:=ReadArrInteger(ReadLnInteger);
  var(n,k,m):=ReadLnInteger3;
  a.Select(x->x=0?x+n:x<0?x+k:x-m).Println;
end.

@gggf 0 / 0 / 0 Регистрация: 01.12.2019 Сообщений: 40
		1
	Ко всем нулевым элементам массива прибавить число n, ко всем отрицательным элементам прибавить число k 03.02.2020, 11:19. Показов 1130. Ответов 1 Метки нет (Все метки) Дан массив целых чисел в диапазоне от -10000 до 10000. Ко всем нулевым элементам массива прибавить число n, ко всем отрицательным элементам прибавит число k, из положительных элементов вычтет число m. Числа n, k, m лежат в пределах от -10000 до 10000. Формат ввода: В первой строке - количество элементов массива не превосходящее 100. На второй строке через пробел элементы массива. На третьей строке числа n, k, m записанные через пробел. Формат вывода: Элементы отсортированного массива на одной строке через пробел. Пример входных данных 5 4 0 -5 1 -2 2 3 4 Пример выходных данных 0 2 -2 -3 1 0

	04.02.2020, 04:15