Laporan Akhir Matrix (Program Pascal)



MATRIX
            Pada laporan akhir kali ini kita akan belajar tentang Matriks dalam Program Pascal dimana akan Belajar membuat sebuah inputan Nilai Matriks hingga mendapatkan sebuah Matriks , Penjumlahan pada Matriks dan Pengurangan pada Matriks.
1.  Langkah pertama kita buat dahulu sebuah tipe data , variabel dan prosedur” yang akan dibutuhkan.
·         Dimulai dari uses crt untuk memulai program pada Pascal.
·         Lalu kita buat tipe data t sebagai object.
·         Kita buat juga m1 dapat 2 mengulang dan m2 dapat 2 mengulang sebagai array dengan tipe data Integer atau Numerik.
·         Buat juga lok sebagai array dapat mengulang  sampai 4 sebagai integer.
·         Kemudian buat prosedur input (untuk input nilai matriks), tambah (untuk penambahan pada Nilai Matriks), tampil (untuk menampilkan ketika inputan nilai Matriks sudah Ada), dan kurang (untuk mengurangkan Nilai Matriks).di Akhiri dengan End;
·         Kemudian buat sebuah Variabel m sebagai t (object).
·         Dan buat sebuah data i , j , k , pil sebagai Integer
Gambar Langkah Pertama seperti berikut ;

2.  Langkah kedua ketika kita sudah membuat apa saja yang kita butuhkan, sekarang kita akan membuat sebuah logika coding program dalam object input.
·         Panggil sebuah prosedur input dengan tipe object (t.input) . lalu mulai
·         Begin dengan clrscr kemudian kita tampilkan tulisan sebagai Inputan Matriks I
·         Masuk kedalam logika pengulangan for i 1 sampai 2x, begin for j 1 sampai 2x , lalu Beigin lagi.
·         Lalu kita tampilkan Element Matriks nya [ i    j] kemudian dibaca m1 , kemudian diakhiri end; dan end; untuk menutup perulangan pada m1 yang dilakukan 2x Begin.
Setelah kita dapat hasil Matriks I sekarang kita buat Matriks ke II
·         Yang akan ditampilkan pada baris 35 dan kolom 1 dengan logika (gotoxy)*x sebagai baris ,y sebagai kolom* sebagai Tulisan. Dengan logika sebagai K sebagai 2 agar menjadi Matriks kedua.
·         Masuk kedalam logika lagi perulangan for i 1 sampai 2x, begin for j 1 sampai 2x , lalu Beigin lagi.
·         Loncat ke baris 35 dengan kolom sebagai k
·         Lalu di tulis Element Matriks [ i      j] dibaca sebagai Matriks kedua.
·         Kemudian diakhiri End sebanyak 3x untuk menutup 1 begin pertama dan 2 begin Matriks kedua.
Gambar Langkah kedua seperti berikut ;



3.  Langkah ketiga kita akan memanggil sebuah prosedur tampil sebagai object gunanya untuk membuat sebuah logika pada prosedur input yang sudah dibuat akan dimasukkan kedalam logika prosedur tampil. Langkah nya seperti berikut;
·         Di mulai dari pemanggilan object prosedur t.tampil .
·         Begin untuk memulai prosedur tampil.
·         Lalu buat writeln untuk kita tampilkan pada layar untuk dibaca.
·         DiTulis pada layar * Matriks I *
·         Lalu ditulis Matriks 1 dari 1,1 dengan 5 spasi  , Matriks 1 dari 1,2 dengan 5 spasi.
·         Kemudian ditulis Matriks 1 dari 2,1 dengan 5 spasi  , Matriks 1 dari 2,2 dengan 5 spasi.
Setelah tampil Matriks I , kita buat juga tampilan pada Matriks II
·         Beda dengan pada Matriks pertama , pada Matriks kedua ini dimulai pada baris 35 kolom 7 untuk menampilkan Tulisan pada Layar * Matriks II *.
·         Lalu pada Baris 35 kolom 8 ditulis Matriks 2 dari 1,1 dengan 5 spasi , Matriks 2 dari 1,2 dengan 5 spasi.
·         Lalu pada Baris 35 kolom 9 ditulis Matriks 2 dari 2,1 dengan 5 spasi ,Matriks 2 dari 2,2 dengan 5 spasi.
·         Kemudian dibaca semuanya didalam layar.
#dengan 5 spasi itu maksudnya jarak 1,1 ke 1,2 ada 5 spasi didalam coding ditulis (:5)
                     
Gambar Langkah ketiga seperti berikut ;


4.  Langkah keempat kita akan buat sebuah coding logika dalam prosedur object tambah yang akan menjumlahkan Matriks I dengan Matriks II.
·         Langkah pertama kita panggil dahulu object prosedur tambah.
·         Lalu dimulai dengan Begin
·         Buat tulisan dengan Hasil Penjumlahan Matriks
·         Kemudian masuk kedalam array lok petama [1] dengan matriks 1 [1,1] ditambah matriks 2 [1,1].
·         Array lok kedua [2] dengan matriks 1 [1,2] ditambah matriks 2 [1,2].
·         Array lok ketiga [3] dengan matriks 1 [2,1] ditambah matriks 2 [2,1].
·         Array lok keempat [4] dengan matriks 1 [2,2] ditambah matriks 2 [2,2].
·         Loncat ke baris 21 kolom 12 ditulis hasil dari array tadi lok[1] dengan 5 spasi , lok[2] dengan 5 spasi.
·         Loncat lagi ke baris 21 kolom 13 ditulis hasil juga array lok [3] dengan 5 spasi , lok [4] dengan 5 spasi.
·         Lalu dibaca hasil dari semua tulisan yang telah dibuat untuk ditampilkan pada Layar.

Gambar Langkah keempat seperti berikut;


5.  Langkah kelima kita akan membuat logika coding pada object prosedur dalam kurang yang gunanya untuk Matriks I dikurang Matriks II atau Matriks II dikurang Matriks I.
·         Panggil prosedur kurang sebagai object.
·         Kemudian Begin.
·         Kita loncat pada Baris 4 kolom 9 ditulis Hasil Matriks I – Matriks II.
·         Kemudian masuk kedalam array lok petama [1] dengan matriks 1 [1,1] dikurang matriks 2 [1,1].
·         Array lok kedua [2] dengan matriks 1 [1,2] dikurang matriks 2 [1,2].
·         Array lok ketiga [3] dengan matriks 1 [2,1] dikurang matriks 2 [2,1].
·         Array lok keempat [4] dengan matriks 1 [2,2] dikurang matriks 2 [2,2].
·         Kita loncat ke baris 11 kolom 11 ditulis hasil dari array tadi lok[1] dengan 5 spasi , lok[2] dengan 5 spasi.
·         Loncat lagi ke baris 11 kolom 12 ditulis hasil juga array lok [3] dengan 5 spasi , lok [4] dengan 5 spasi.
Hasil Pengurangan pada Matriks I – Matriks II sudah kita dapatkan , namun kita akan buat juga Matriks II – Matriks I.
·         Pertama kita loncat pada Baris 40 pada kolom 9 ditulis Hasil Matriks II – Matriks I
·         Kemudian masuk kedalam array lok petama [1] dengan matriks 2 [1,1] dikurang matriks 1 [1,1].
·         Array lok kedua [2] dengan matriks 2 [1,2] dikurang matriks 1 [1,2].
·         Array lok ketiga [3] dengan matriks 2 [2,1] dikurang matriks 1 [2,1].
·         Array lok keempat [4] dengan matriks 2 [2,2] dikurang matriks 1 [2,2].
·         Kemudian loncat ke baris 45 kolom 11 ditulis hasil dari array tadi lok[1] dengan 5 spasi , lok[2] dengan 5 spasi.
·         Lalu loncat lagi ke baris 45 kolom 12 ditulis hasil dari array tadi lok[3] dengan 5 spasi , lok[4] dengan 5 spasi.
·         Kemudian dibaca semua tulisan yang sudah dibuat didalam prosedur object kurang untuk ditampilkan pada Layar.
Gambar Langkah Kelima seperti Berikut ;


6.  Langkah keenam ini adalah langkah terakhir , disini kita akan membuat sebuah menu Matriks yang akan ditampilkan pada layar.
·         Dimulai dengan Begin , lalu kita Repeat yang berarti dapat berulang setelah kita pilih yang terdapat pada menu. Gunakan juga clrscr untuk membersihkan layar ketika Mengulang (repeat).
·         Loncat ke baris 25 baris 1 ditulis |----Menu Matriks----|
·         Loncat ke baris 25 baris 2 ditulis |    1.input Matriks     |
·         Loncat ke baris 25 baris 3 ditulis |  2. Penjumlahan M  |
·         Loncat ke baris 25 baris 4 ditulis | 3.Pengurangan M    |
·         Loncat ke baris 25 baris 5 ditulis |   4. Exit                     |
·         Loncat ke baris 25 baris 6 ditulis |---------------------------|
·         Loncat ke baris 25 kolom 7 ditulis Pilihan namun ada Array [1..4] yang akan dibaca sebagai (pil)
·         Didalam pil kita buat case of pil
·         Jika pilih 1 akan memulai object m sebagai input dan object m sebagai tampil kemudian diakhiri.
·         Jika pilih 2 akan tampil object m sebagai tambah.
·         Jika pilih 3 akan tampil object m sebagai kurang.
·         Sampai jika kita pilih 4 akan berakhir dan menutup programnya.

Gambar langkah keenam seperti berikut;

 


OUTPUT

Jika Memilih 1

Jika Memilih 2

Jika Memilih 3

Laporan Akhir Matrix (Program Pascal) Laporan Akhir Matrix (Program Pascal) Reviewed by Rota on 20.28 Rating: 5

Tidak ada komentar:

Diberdayakan oleh Blogger.