Posted by Ketut Joko on Wednesday, March 23, 2011,
In :
array
Berikut merupakan kode perkalian 2 matrix :
uses crt;vara,f,k:array[1..100,1..100] of integer;b,c,i,j,l,z:longint; m,n,d,e,g,h:byte;begin clrscr;write(' Program Perkalian 2 Matriks');readln;writeln;writeln;writeln('Masukkan data untuk matriks pertama (M1)'); writeln;write('banyaknya baris matriks pertama: '); readln(b);write('banyaknya kolom matriks pertama: '); readln(c);writeln;for d:= 1 to b dobeginfor e:= 1 to c dobeginwrite('entri baris ke-',d,' kolom ke-',e,': '); readln(a[d,e]);end;end... Continue reading ...