설명

간단한 가우스 제거 단계는 다음과 같은 행렬에서 수행됩니다.
동일하게 레이블이 지정된 행과 열. 암시된 피벗 시퀀스
1.1, 2.2 등입니다.

소형 모델 유형 :무료 슬롯 게임

카테고리 : 무료 슬롯 게임 모델 라이브러리

메인 파일 : pivot.gms

$title 단순 가우스 제거 단계(PIVOT,SEQ=70)

$onText
단순 가우스 제거 단계는 다음과 같은 행렬에서 수행됩니다.
동일하게 레이블이 지정된 행과 열. 암시된 피벗 시퀀스
1.1, 2.2 등입니다.

무료 슬롯 게임 Development Corporation, 공식화 및 언어 예제.

키워드: 가우스 소거, 수학
$offText

세트
   i '행렬 레이블' / 1*6 /
   r(i) '피벗 시퀀스'
   k(i) '비 피벗 행'
   l(i) '비 피벗 열';

별칭(i,j);

매개변수
   a(i,j) '원래 행렬'
   b(i,j) 'a의 역수'
   피브
   데트;

a(i,j) = 균일(-.3,0);
a(i,i) = 1;
r(i) = 그렇습니다;
k(i) = 그렇습니다;
l(j) = 그렇습니다;
b(i,j) = a(i,j);
데트 = 1;

루프(r,
   k(r) = 아니오;
   l(r) = 아니오;

   piv = 1/b(r,r);
   det = det/piv;
   b(r,l) = b(r,l)*piv;
   b(k,l) = b(k,l) - b(r,l)*b(k,r);
   b(k,r) = -b(k,r)*piv;
   b(r,r) = piv;

   k(r) = 그렇습니다;
   l(r) = 그렇습니다;
);

디스플레이 det, a, b;

매개변수 확인(i,j);
check(i,j) = sum(k, a(i,k)*b(k,j));

디스플레이 확인;