Тема: Массив
Показать сообщение отдельно
  #2  
Старый 02.07.2016, 03:55
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

I) Первое условие:
1. найти первое нечетное число в массиве.
2. Проверить, что все осталные эдементы нечетные.
3. По результатам проверки выставить флаг.

II) Копирование.
Ну тут просто. Идем по массиву и в соотвествии с флагом копируем либо положительные, либо отрицательные.

III) Перестановка.
Тут еще проще. Бежим по результирующему массиву до середины и переставляем элементы с соответсвующими, но отсчитанными от конца массива.
Ответить с цитированием