‘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