Minggu, 11 November 2012 0 komentar

LA ALIN II

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;

Jumat, 09 November 2012 0 komentar

LP ALIN


Soal :
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.

0 komentar

LP COBOL IV


Soal :
1. Apa yang dimaksud array pada cobol?
2. Sebutkan dan jelaskan macam – macam array
3. Buat program sederhana array
0 komentar

LA COBOL IV

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???'.


Jumat, 02 November 2012 1 komentar

LP COBOL III


Soal :
1. apa yang kamu ketahui tentang statement perulangan pada cobol?
2. sebutkan bentuk umum statement perulangan pada cobol!
3. sebutkan jenis2 statement perulangan pada cobol!

 
;