Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.10.2011, 21:25   #1
Валерия2701
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 1
По умолчанию в массиве все максимальные элементы заменить первым элементом, а все минимальные элементы заменить последним элементом

помогите пожалуйста. срочно
Валерия2701 вне форума Ответить с цитированием
Старый 12.10.2011, 15:49   #2
rubius2008
Форумчанин
 
Регистрация: 19.03.2010
Сообщений: 409
По умолчанию

Цитата:
в массиве все максимальные элементы заменить первым элементом
сначала находим максимальный элемент
Код:
max:=a[1];
for i:=2 to n do if a[i]>max then max:=a[i];
потом заменяем
Код:
for i:=1 to n do if a[i]=max then a[i]:=a[1];
по аналогии для минимального
Есть вопросы, пишите в ЛС.
rubius2008 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Заменить на 0 все элементы матрицы лежащие на главной диагонали и выше ее... Анастасия01 Помощь студентам 6 30.06.2011 13:55
заменить нулем все элементы меньшие введенного числа Сашуня Паскаль, Turbo Pascal, PascalABC.NET 2 23.05.2011 22:18
Матрица целых чисел М(3,4). Все отрицательные элементы заменить их квадратами. (Basic) AnnKarpinskaya Помощь студентам 1 16.05.2011 14:51
Все элементы выше главной диагонали квадратной матрицы, заменить на минимальный элемент (VisualBasic) ride013 Помощь студентам 4 03.05.2011 20:40
Все отрицательные элементы массива А заменить на сумму, а положительные на полусумму предшествующих Lada05 Помощь студентам 1 27.10.2010 15:44