1樓:匿名使用者
function x=gauss_pivot(a,b)% 用gauss列主主元消去法解線性方程組ax=b%x是未知向量
n=length(b);
x=zeros(n,1);
c=zeros(1,n);
d1=0
for i=1:n-1
max=abs(a(i,i));
m=i;
for j=i+1:n
if max
max=abs(a(j,i));
m=j;
endend
if(m~=i)
for k=i:n
c(k)=a(i,k);
a(i,k)=a(m,k);
a(m,k)=c(k);
endd1=b(i);
b(i)=b(m);
b(m)=d1;
endfor k=i+1:n
for j=i+1:n
a(k,j)=a(k,j)-a(i,j)*a(k,i)/a(i,i);
endb(k)=b(k)-b(i)*a(k,i)/a(i,i);
a(k,i)=0;
endend
%回代求解
x(n)=b(n)/a(n,n);
for i=n-1:-1:1
sum=0;
for j=i+1:n
sum=sum+a(i,j)*x(j);
endx(i)=(b(i)-sum)/a(i,i);end
2樓:eleven紅毛
function x=gauss_pivot(a,b)n=length(b);
x=zeros(n,1);
c=zeros(1,n);
d1=0
for i=1:n-1
max=abs(a(i,i));
m=i;
for j=i+1:n
if max~
62616964757a686964616fe59b9ee7ad9431333264663032=i)
for k=i:n
c(k)=a(i,k);
a(i,k)=a(m,k);
a(m,k)=c(k);
endd1=b(i);
b(i)=b(m);
b(m)=d1;
endfor k=i+1:n
for j=i+1:n
a(k,j)=a(k,j)-a(i,j)*a(k,i)/a(i,i);
endb(k)=b(k)-b(i)*a(k,i)/a(i,i);
a(k,i)=0;
endend
x(n)=b(n)/a(n,n);
for i=n-1:-1:1
sum=0;
for j=i+1:n
sum=sum+a(i,j)*x(j);
endx(i)=(b(i)-sum)/a(i,i);end
用matlab求代數方程3*x^5+4*x^4+7*x^3+2*x^2+9*x+12=0的所有根
3樓:書宬
^x=roots([3 4 7 2 9 12])或zhi
x=double(solve('3*x^dao5+4*x^4+7*x^3+2*x^2+9*x+12'))
結果版:權
x =-0.9583
0.6737 + 1.0159i
-0.8612 - 1.4377i
-0.8612 + 1.4377i
0.6737 - 1.0159i
找一本小說,男主重生,女主穿越,找一本小說,男主重生,女主穿越
於自己權穿越成極品惡女,外帶有極品老媽極品哥哥這種事情很是淡定。當然了,她還是對洗心革面重新做人什麼的抱著那麼一小丟丟的希望。於是穿越大神被感動了 那就賜你個極品男人吧。一句話概括 坑爹穿越女與自戀重生男的雞飛狗跳生活 ps 女主穿越,男主重生,不喜此設定者請慎重跳坑。求一本 女主穿越 男主重生 的...
找一本女主重生小說,找一本女主重生小說?
我在橘子bai 裡,倒是du看了幾本空間的 其中一zhi本叫空間之農dao女無雙,講述了回21世紀的白意萱為了救人搭上了答自己一條命,一朝穿越到古代被退婚的貧窮少女身上。醫毒雙絕,慢慢成了遠近聞名的小神醫,開啟逆天空間,幫她掃清一切障礙,帶領親友齊奔小康 在橘子 裡可以免費看完全文的,它家主要都是女...
找一本女主重生的小說,找一本女主重生小說?
豪門權婦 如果愛我,就請為我去死吧!我會感激你的。十年的婚姻和付出,葉嫵等來的就是這句話。君明翊,世人稱頌的絕世好丈夫,親手把妻子葉嫵逼上絕路,一邊親吻著情人面頰,一邊用刀捅上妻子的心臟,還那般繾綣深情的問她 葉嫵,你為什麼還不肯去死?為什麼不肯成全我和她的愛情?那個溫柔入骨的男人,結婚十年,卻以真...