Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (133.11 KB, 32 trang )
<span class="text_page_counter">Trang 1</span><div class="page_container" data-page="1">
<small>function bdsc_mtbt</small>
<small> A=input('Nhap A: ');%nhap giá tri ma tran can tính tốn%</small>
<small> [m,n]=size(A);%gán cho m là so hàng n là so cot cua ma tran%</small>
<small> h=1;%gán cho h=1 lát nua se dùng nhý là bien chi cot%</small>
<small> for k=1:m-1;%cho k chay tu 1-> m-1%</small>
<small> for j=h:n;%ung voi moi giá tri k ðang chay thi ta cho j(là bien chi cot) chay tu h=1 ->n</small>
<small> for i=k:m;%ung voi moi giá tri j ta lai cho i(là bien chi hàng)chay tu k=1 ->m</small>
<small> if(A(i,j)~=0)%i và j chay cho ðen khi phan tu ma tran thuoc hàng i cot j khác 0(hieu là:neu quét ma tran tung cot mot tu trên xuong dýoi cho ðen khi gap mot phan tu khác 0 thi thôi)</small>
<small> break;%neu phan tu hàng i cot j khác 0 thi nó se dung và bo lenh 'for'ðang chua nó tuc là lai bat ðau chay tu 'for j=h:n'%</small>
<small> A(i,j)=A(i,j)-a*A(k,j);%sau do phan tu ma tran hang i cot j se nhan duoc gia tri moi bang phep tru tren%</small>
<small> tmp = m; m = n; n = tmp;% doi bien m voi n%</small>
<small> for s=1:n;%g?i s la bien so hang chay tu 1->n%</small>
<small> i=n+1-s; %bien i cung la bien so hang nhung ch?y nguoc lai bien s%</small>
<small> for j=1:m;%j la bien so cot%</small>
<small> if A(i,j)~=0%nghia la lan luot quet ma tran lan luot tu duoi len tren tung hang tu trai sang phai , khi tim duoc phan tu khac 0 thi dung lai%</small>
<small> k=i;%gan cho k tri so cua hang co cac phan tu khac 0%</small>
<small> break;%neu tim duoc mot gia tri cua ma tran A bang cach quet nhu vay thi dung lai</small>
<small> end;</small>
</div><span class="text_page_counter">Trang 12</span><div class="page_container" data-page="12">else Disp(' V1 khong vuong goc V2')
</div>