menjumlahkan dua matrik 2 x 3

‘program menjumlahkan dua matriks’

cls

print “ini matriks A”

for i= 1 to 2

for j= 1 to 3

print “A[“;i;”,”;j;”] =”; :input A(i,j)

next j

next i

print “ini matriks B”

for i= 1 to 2

for j= 1 to 3

print “B[“;i;”,”;j;”] =”; :input B(i,j)

next j

next i

for i= 1 to 2

for j= 1 to 2

C(i,j)=A(i,j)+B(i,j)

next j

next i

print ” ini jumlah matriks C”

for i= 1 to 2

for j= 1 to 2

print “C[“;i;”,”;j;”] =”; :print C(i,j)

next j

next i

END

Iklan