Advertisement
Guest User

Untitled

a guest
Nov 27th, 2014
151
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.33 KB | None | 0 0
  1. function [ B,D,v ] = stanko( A )
  2. [n]=size(A);
  3. D=ones(2,2);
  4. B=A;
  5. for i=1:n
  6. for j=1:n
  7. B(i,i)=A(i,i)*10;
  8.  
  9. end
  10. end
  11.  
  12. D(1,1)=A(1,1);
  13. D(1,2)=A(1,n(1));
  14. D(2,1)=A(n(1),1);
  15. D(2,2)=A(n(1),n(1));
  16.  
  17. for i=1:n
  18. for j=1:n
  19. if (i==n-j+1)
  20. v(i)=A(i,j)
  21. end
  22. end
  23. end
  24.  
  25.  
  26. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement