matriz(1,1)=XA1;
matriz(1,2)=0;
matriz(1,3)=0;
matriz(1,4)=0;
matriz(2,1)=0;
matriz(2,2)=XB2;
matriz(2,3)=0;
matriz(2,4)=0;
matriz(3,1)=XA3;
matriz(3,2)=XB3;
matriz(3,3)=0;
matriz(3,4)=0;
matriz(4,1)=XA4;
matriz(4,2)=XB4;
matriz(4,3)=XC4;
matriz(4,4)=XD4;
matriz(5,1)=0;
matriz(5,2)=0;
matriz(5,3)=XC5;
matriz(5,4)=XD5;
matriz(6,1)=0;
matriz(6,2)=0;
matriz(6,3)=XC6;
matriz(6,4)=XD6;
matriz(7,1)=0;
matriz(7,2)=0;
matriz(7,3)=XC7;
matriz(7,4)=XD7;
matriz(8,1)=0;
matriz(8,2)=0;
matriz(8,3)=XC8;
matriz(8,4)=XD8;
matriz(9,1)=XA9;
matriz(9,2)=XB9;
matriz(9,3)=0;
matriz(9,4)=0;
matriz(10,1)=XA10;
matriz(10,2)=XB10;
matriz(10,3)=XC10;
matriz(10,4)=XD10;
matriz(11,1)=XA11;
matriz(11,2)=XB11;
matriz(11,3)=0;
matriz(11,4)=0;
matriz(12,1)=0;
matriz(12,2)=0;
matriz(12,3)=XC12;
matriz(12,4)=XD12;

disp('           A     B     C    D')

for X=1:12; X<=12; X+1;
end
linha='corrente'+X+' ';

for Y=1:4; Y<=4; Y+1;
end
linhacompleta=linha+matriz(X,Y)+' ';
disp(linhacompleta)
linhacompleta=' '