22BEC0052_Controlsy​stems_DA_1

1. Determine transpose, inverse values of given matrix.

clc

clear

close all

x=input("Enter the matrix: ");

% finding transpose

[m,n]=size(x);

t=zeros(n,m);

for i=1:n

for j=1:m

t(i,j)=x(j,i);

end

end

disp("Transverse of the matrix is: ")

disp(t)

% finding inverse

if m==n

if det(x)==0

disp("The inverse does not exist as the determinant is zero")

else

in=inv(x);

disp("Inverse of the matrix is: ")

disp(in)

end

else

disp("The matrix is not a square matrix")

end