Chapter 9, Problem 18P

Develop, debug, and test a program in either a high-level language or macro language of your choice to solve a system of equations with Gauss elimination with partial pivoting. Base the program on the pseudocode from Fig. 9.6. Test the program using the following system (which has an answer of $x_1=x_2=x_3=1$),

$\begin{array}{l}{x}_1+2x_2-x_3=2\\ 5x_1+2x_2+2x_3=9\\ -3x_1+5x_2-x_3=1\end{array}$