Функция инвертирования - Free Pascal

Узнай цену своей работы

Формулировка задачи:

Нужна функция к модулю, которая инвертирует элементы одномерного массива в обратном порядке. Моя идея:
 function Inv(const aArr : array of Integer) : Integer;
  var
  i, k: Integer;
  begin
     for i := 0 to High(aArr) do begin
     k:= aArr[i+1]; aArr[i]:=k;
  end;
  end;
Не могу довести до конца. Думаю, что нужен ещё один счётчик, чтобы сначала при фиксированном значении счётчика довести до конца первый элемент, затем прибавить значение и т.д.

Решение задачи: «Функция инвертирования»

textual
Листинг программы
Inv(mas,n);

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 4.167 из 5
Похожие ответы