70/CH1/EX1.4.2/1_4_2.sci


1
2
3
4
5
6
7
8
9

clear;
close;
clc;
A=[2 3;7 8];
disp(A,'A=');
P=[0 1;1 0];
disp(P,'P(Row exchange matrix)=')
disp(P*A,'PA=')
//end