Forum grupy 6 WIL

wyżyk

function x=metgj(A,B,n)
A=[13,5;1,7];
B=[15;8];
n=2;
for i=1:n
s=A(i,i);
for j=1:n
A(i,j)=A(i,j)/s;
end
B(i)=B(i)/s;
for k=1:n
if (k!=i)
s=A(k,i);
for j=1:n
A(k,j)=A(k,j)-A(i,j)*s;
end
B(k)=B(k)-B(i)*s;
end
end
end
x=B;

r=B-A*x;
w=max(abs(r));

if (w>1.0e-3)
printf("blad\n");
else
printf("x=%f\n");

end
end

wszelkie zastrzezenia prosze do mnie zglaszac Rumuny

Gość

wow, look at that!
[link widoczny dla zalogowanych]

Petapmapghja38

The best free adult video storage on the net!
[link widoczny dla zalogowanych]

Adammapjo5

The best free adult video storage on the net!
[link widoczny dla zalogowanych]