Функция инвертирования - 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);
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д