Program Matrix :
uses crt;
type t = object
m1, m2 : array [1..2,1..2] of integer;
lok : array [1..4] of integer;
procedure input;
procedure tampil;
procedure tambah;
procedure kurang;
end;
var m: t;
i,j,k,pil : integer;
procedure t.input;
begin
clrscr;
writeln ('input matrix I');
for i:= 1 to 2 do
begin
for j:= 1 to 2 do
begin
write('elemen matrix [',i,',',j,']: ');
readln (m1[i,j]);
end;
end;
gotoxy (35,1); writeln('inputan matrix II');
k:=2;
for i:=1 to 2 do
begin
for j:=1 to 2 do
begin
gotoxy (35,k);
inc (k);
write('elemen matrix [',i,',',j,']: ');
readln(m2[i,j]);
end;
end;
end;
Soal :
1. Matriks ?
2. Penjumlahan dan Pengurangan pada Matrix ? dan contohnya !
1. Matriks ?
2. Penjumlahan dan Pengurangan pada Matrix ? dan contohnya !
Jawaban :
Matriks adalah suatu kumpulan besaran (variabel dan konstanta) yang tersusun dalam baris dan kolom berbentuk persegi panjang. Matriks merupakan suatu cara visualisasi variabel yang merupakan kumpulan dari angka-angka atau variabel lain, misalnya vektor. Dengan representasi matriks, perhitungan dapat dilakukan dengan lebih terstruktur. Pemanfaatannya misalnya dalam menjelaskan persamaan linier, transformasi koordinat, dan lainnya. Matriks seperti halnya variabel biasa dapat dimanipulasi, seperti dikalikan, dijumlah, dikurangkan dan didekomposisikan.
Program 1
IDENTIFICATION DIVISION.
PROGRAM-ID. TEST.
AUTHOR. SHIRO.
ENVIRONMENT DIVISION.
DATA DIVISION.
SCREEN SECTION.
01 CLS.
02 BLANK SCREEN.
PROCEDURE DIVISION.
MULAI.
DISPLAY CLS.
PERFORM PROCEDURE-A 3 TIMES.
PERFORM PROCEDURE-B 5 TIMES.
PERFORM PROCEDURE-A 3 TIMES.
PROCEDURE-A.
DISPLAY '********************'.
DISPLAY '^^^^^^^^^^^^^^^^^^^^'.
PROCEDURE-B.
DISPLAY 'CIUS??? MIAPAH??? MACACIH???'.
IDENTIFICATION DIVISION.
PROGRAM-ID. TEST.
AUTHOR. SHIRO.
ENVIRONMENT DIVISION.
DATA DIVISION.
SCREEN SECTION.
01 CLS.
02 BLANK SCREEN.
PROCEDURE DIVISION.
MULAI.
DISPLAY CLS.
PERFORM PROCEDURE-A 3 TIMES.
PERFORM PROCEDURE-B 5 TIMES.
PERFORM PROCEDURE-A 3 TIMES.
PROCEDURE-A.
DISPLAY '********************'.
DISPLAY '^^^^^^^^^^^^^^^^^^^^'.
PROCEDURE-B.
DISPLAY 'CIUS??? MIAPAH??? MACACIH???'.
Langganan:
Postingan (Atom)






- Follow Us on Twitter!
- "Join Us on Facebook!
- RSS
Contact