?? gauss.m
字號:
function u=gauss(a,n)
for k=1:n-1
for i=k+1:n
for j=k+1:n+1
if abs(a(k,k))>1e-6
a(i,j)=a(i,j)-a(i,k)/a(k,k)*a(k,j);
else
msgbox('Gauss消去失敗','計算結果');
pause;
exit;
end
end
end
end
x(n)=a(n,n+1)/a(n,n);
for i=n-1:-1:1
s=0;
for j=i+1:n
s=s+a(i,j)*x(j);
end
x(i)=(a(i,n+1)-s)/a(i,i);
end
u=x;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -