Алгебраических уравнений методом Зейделя

Программа для решения систем линейных

Программа для метода простых итераций

Пример решения программы

x₁=

x₂=

x₃=

x₄=

CLS

INPUT X1, X2, X3, X4

DEF FNF(X2, X3, X4)=(10-1,1*X2-0,7*X3-0,8*X4)/4

DEF FNA(X1, X3, X4)=(-18-0,2*X1-1,2*X3-0,5*X4)/(-17)

DEF FNB(X1, X2, X4)=(-11-0,2*X1-1,2*X2-0,5*X4)/(-9)

DEF FNE(X1, X2, X3)=(10-1,3*X1-0,7*X2-1,3*X3)/14

M1: X11=FNF(X2, X3, X4)

X21=FNA(X1, X3, X4)

X31=FNB(X1, X2, X4)

X41=FNE(X1, X2, X3): PRINT X11, X21, X31, X41

X1=X11: X2=X21: X3=X31: X4=X41

INPUR TT; GOTO M1

REM ZEID

CLS

DEF FNF(X2,X3,X4)=

DEF FNA(X1,X3,X4)=

DEF FNB(X1,X2,X4)=

DEF FNE(X1,X2,X3)=

M1: X1=FNF(X2,X3,X4)

X2=FNA(X1,X3,X4)

X3=FNB(X1,X2,X4)

X4=FNE(X1,X2,X3)

PRINT X1,X2,X3,X4

INPUT TT: GOTO M1

Дата добавления: 2014-01-06