• Предмет: Информатика
  • Автор: chumachenkov358
  • Вопрос задан 7 лет назад

массиве вставить число равное максимальному элементу после минимального элемента
Паскаль массивы решить задачу пжжж

Ответы

Ответ дал: BobbyFresnel
0

===== PascalABC.NET =====

begin

 var n := ReadInteger('n =');

 var a := ArrRandom(n, -99, 99);

 a.Println;

 var amax := a.Max;

 var imin := a.IndexMin + 1;

 a := a[:imin] + Arr(amax) + a[imin:];

 a.Print

end.

Приложения:
Похожие вопросы