Преобразовать массив по заданому правилу

@Tranya · Регистрация: 13.11.2018

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

Преобразовать массив х по следующему правилу (можно воспользоваться вспомогательным массивом): все отрицательные элементы массива х перенести в его начало, а все остальные — в конец, сохраняя исходное взаимное расположение, как среди отрицательных, так и среди остальных элементов.
__

@bormant · 16.11.2018, 17:40

Pascal

1
2
3

  t:=x; j:=1;
  for i:=1 to n do if t[i]<0  then begin x[j]:=t[i]; Inc(j); end;
  for i:=1 to n do if t[i]>=0 then begin x[j]:=t[i]; Inc(j); end;

@Tranya 0 / 0 / 0 Регистрация: 13.11.2018 Сообщений: 6
		1
	Преобразовать массив по заданому правилу 16.11.2018, 17:03. Показов 825. Ответов 1 Метки abc pascal, pascal abc, pascal перестановка элементов, массив pascal (Все метки) Преобразовать массив х по следующему правилу (можно воспользоваться вспомогательным массивом): все отрицательные элементы массива х перенести в его начало, а все остальные — в конец, сохраняя исходное взаимное расположение, как среди отрицательных, так и среди остальных элементов. __ 0

	16.11.2018, 17:40