Цитата:
|
Сообщение от Alinca3303
Заменить нулями элементы массива между минимальным и максимальным, кроме их самих.
|
Вы же уже знаете как найти максимальный элемент, минимальный находится по такому же принципу - заведите переменную MinInd, и в том же цикле поставьте такое же условие, только со знаком "больше" (>).
Нашли эти 2 элемента: выясняем какой индекс больше, а какой меньше с помощью простого условного оператора If ... Then
Для примера я предположу, что: MinInd<MaxInd
Код:
For i:=MinInd+1 To MaxInd-1 Do
Mas[i]:=0;
Это же элементарно. А первая задача - вообще до ужаса простая.