Pascal Language - Inverting the elements of an array- recursion

Ask a question

Here is a recursive procedure that allows the elements to reverse part of a table between the position p and n:

Procedure Invert (Var t : Tab; p, n : Integer);   

Var aux : Real;   
     If p < n Then   
          aux := t[p];   
          t[p] := t[n];   
          t[n] := aux;   
          Inverser (t, p + 1, n - 1);             

Thanks to Zouari Lazhar for this tip

Pascal Language - Shift array of elements (Rotation)-Recursion
Assembly - Multiplication by a constant