Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function [ B,D,v ] = stanko( A )
- [n]=size(A);
- D=ones(2,2);
- B=A;
- for i=1:n
- for j=1:n
- B(i,i)=A(i,i)*10;
- end
- end
- D(1,1)=A(1,1);
- D(1,2)=A(1,n(1));
- D(2,1)=A(n(1),1);
- D(2,2)=A(n(1),n(1));
- for i=1:n
- for j=1:n
- if (i==n-j+1)
- v(i)=A(i,j)
- end
- end
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement