70 likes | 260 Views
Tugas Aljabar Linear . Buat aplikasi dengan bahasa pemrograman Pascal untuk mencari determinan dengan Reduksi Baris. Algoritma. INPUT Matrix A dari File teks Jika a 11 bernilai 0 tukar dengan baris > 1 . Operasikan baris 2 –> n untuk kolom 1 operasikan dengan baris 1 sehingga nilainya 0
E N D
Tugas Aljabar Linear • Buat aplikasi dengan bahasa pemrograman Pascal untuk mencari determinan dengan Reduksi Baris
Algoritma • INPUT Matrix A dari File teks • Jika a11 bernilai 0 tukar dengan baris > 1 . • Operasikan baris 2 –> n untuk kolom 1 operasikan dengan baris 1 sehingga nilainya 0 • Ulangi langkah 2 untuk nilai a22 –> an-1n-1 • Hitung Determinan = hasil kali elemen diagonal utama=a11.a22…ann
Algoritma Tukar Baris • Input Baris-j, baris-k • Loop i=1 -> n • Temp <- A[baris-j,i] • A[baris-j,i]<- A[baris-k,i] • A[baris-k,i]<- Temp • End Loop i
Algoritma Operasi Baris • Input baris_tetap • Loop i=baris_tetap+1 -> n • Fak_kali:=(MAT[i,baris_tetap]/MAT[baris_tetap,baris_tetap]); • Loop j=baris_tetap->n • MAT[i,j]:=-fak_kali*MAT[baris_tetap,j]+MAT[i,j];End loop j • End loop i
Contoh IsiFile Input matrix.in 4 1 2 3 0 3 5 2 1 2 3 1 1 6 3 2 1 Download file: Matrix.pas matrix.in