"Idempotent Matrix, pg. 7"

A = {{2, -2, -4}, {-1, 3, 
            4}, {1, -2, -3}};
Print["A=", MatrixForm[A]];

\(\(Print[\*""\!\(A\^2\)="", MatrixForm[A . A]];\)\)

A = {{2, -2, -4}, {0, 0, 
            0}, {1, -2, -3}};
Print["A=", MatrixForm[A]];

Print[MatrixForm[Inverse[A]]]