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)
Reviewed by Rota
on
20.28
Rating:
Tidak ada komentar: