Cara membuat program Matriks dan Penjumlahan Matriks

Langkah pertama buka Qbasic
Kemudian masukan bahasa program Qbasic berikut :

CLS

PRINT "====MATRIKS I===="

FOR C = 1 TO 2

    FOR D = 1 TO 2

        INPUT "Masukan Angka :", MAT1(C, D)

    NEXT D

NEXT C

PRINT

FOR f = 1 TO 2

    FOR g = 1 TO 2

        PRINT MAT1(f, g);

    NEXT g

    PRINT

NEXT f

PRINT

PRINT "====MATRIKS II===="

FOR i = 1 TO 2

    FOR j = 1 TO 2

        INPUT "Masukan Angka:", MAT2(i, j)

    NEXT j

NEXT i

FOR m = 1 TO 2

    FOR n = 1 TO 2

        PRINT MAT2(m, n);

    NEXT n

    PRINT

NEXT m

PRINT

PRINT "Hasil Penjumlahan MATRIKS I dan MATRIKS II"

hasil(1, 1) = MAT1(1, 1) + MAT2(1, 1)

hasil(1, 2) = MAT1(1, 2) + MAT2(1, 2)

hasil(2, 1) = MAT1(2, 1) + MAT2(2, 1)

hasil(2, 2) = MAT1(2, 2) + MAT2(2, 2)

FOR p = 1 TO 2

    FOR q = 1 TO 2

        PRINT hasil(p, q);

    NEXT q

    PRINT

NEXT p

END

·         Tekan F5 untuk menjalankannya atau klik strart > RUN

BERIKUT HASILNYA

                                                                           

CLS ,Untuk membersihkan layar

Print “ ====MATRIKS====” , mencetak ====MATRIKS====

FOR c = 1 TO 2

FOR d = 1 TO 2 , melakukan perulangan looping “FOR” dengan harga  c dan d = 1 dan batas loopnya 2

INPUT “Masukan Nama :”, MAT$(c, d) , meminta data ke user untuk harga c dan d berupa string

FOR f = 1 TO 2

FOR g = 1 TO 2, melakukan perulangan looping “FOR” dengan harga  f dan g = 1 dan batas loopnya 2

PRINT MAT$(f, g) , mencetak nilai (f, g) yang berupa string.

hasil(1, 1) = MAT1(1, 1) + MAT2(1, 1)

hasil(1, 2) = MAT1(1, 2) + MAT2(1, 2)

hasil(2, 1) = MAT1(2, 1) + MAT2(2, 1)

hasil(2, 2) = MAT1(2, 2) + MAT2(2, 2) , Untuk menjummlahkan matriks I dan matriks II

END, mengakhiri program