M={{5.27,0.65,0.78,1,0,0},{0.82,6.02,1,0,1,0},{0.41,0.41,6.68,0,0,1}};
Print["М=",MatrixForm[M]];
y1=(∑_(i=1)^6)(Subscript[M, [[1,i]]]);
y2=(∑_(i=1)^6)(Subscript[M, [[2,i]]]);
y3=(∑_(i=1)^6)(Subscript[M, [[3,i]]]);
Print[{y1,y2,y3}];
M1={{0,0,0,0,0,0},{0,0,0,0,0,0},{0,0,0,0,0,0}};
(Subscript[M1, [[1]]])=(Subscript[M, [[1]]])/(Subscript[M, [[1,1]]]);
(Subscript[M1, [[2]]])=(Subscript[M, [[2]]])-(Subscript[M1, [[1]]])*(Subscript[M, [[2,1]]]);
(Subscript[M1, [[3]]])=(Subscript[M, [[3]]])-(Subscript[M1, [[1]]])*(Subscript[M, [[3,1]]]);
Print["М1=",MatrixForm[M1]];