Metode Jacobi: Perbedaan antara revisi
Konten dihapus Konten ditambahkan
Tidak ada ringkasan suntingan |
Tidak ada ringkasan suntingan |
||
Baris 57:
: H=X0'<br>
: n=length (b)<br>
: X=X0<br>
: for k:=1 until N<br>
:: for i:=i until n,<br>
::: S = b (i) - A (i,[1:i-1,i+1:n]) * X0 (1:i-1,i+1:n](<br>
::: X(i) = S / A (i,i)<br>
:: end<br>
:: g = abs (X-X0)<br>
:: err = norm (g)<br>
:: relerr = err / (norm (X)+eps)<br>
:: X0 = X<br>
:: H = [H;X0']<br>
| |||