Jumat, 23 November 2012

pemrograman cobol


PEMROGRAMAN
COBOL


COBOL atau Common Buisness Oriented Language adalah suatu
bahasa komputer tingkat tinggi yang berorientasi langsung pada
permasalahan bisnis.
COBOL hampir dapat digunakan pada semua komputer. Diciptakan
pada tahun 1959. Pengembangan bahasa COBOL selanjutnya dilakukan
oleh suatu grup yang disebut CODASYL, singkatan dari Conference on
Data System Language.
Bahasa COBOL pertama diperkenalkan secara formal pada bulan
Januari 1960, dan disebut COBOL-60. Karena orientasinya pada suatu
masalah, bahasa ini disebut juga dengan istilah Problem Oriented
Language.
COBOL dibuat untuk operasi yang mencakup langkah dasar
pengolahan data, yaitu membaca data, memproses data, dan kemudian
menghasilkan output berupa informasi.
COBOL merupakan bahasa terstruktur, mudah dibaca, dan mudah
dipelajari. COBOL terdiri dari empat divisi yaitu IDENTIFICATION
DIVISION, ENVIRONMENT DIVISION, DATA DIVISION, dan
PROCEDURE DIVISION.
Ada dua bagian utama dalam bahasa COBOL, DATA DIVISION
dan PROCEDURE DIVISION. DATA DIVISION memuat dan
menggambarkan bentuk dan jenis dari data input dan outputnya.
PROCEDURE DIVISION menggambarkan prosedur yang digunakan
untuk menyelesaikan permasalahan dengan bentuk dan jenis data yang
ada pada DATA DIVISION.
Dari apa yang dapat dikerjakan COBOL, konsep COBOL
orientasinya pada permasalahan bisnis sebenarnya dapat untuk semua
permasalahan yang berhubungan dengan pengolahan data, misalnya
pengolahan data mahasiswa.
PENGENALAN DASAR
PEMROGRAMAN COBOL

A. Pengenalan COBOL
Sekilas tentang program COBOL.
COBOL adalah kepanjangan dari Common Bussiness Oriented
Language. Bahasa COBOL digolongkan sebagai High Level Language
(bahasa pemrograman tingkat tinggi) yang berorientasi pada masalah
bisnis. Diciptakan pada tahun 1959.
COBOL pertama kali diperkenalkan secara formal bulan Januari 1960
dan disebut dengan COBOL-60. Dan diperbaharui tahun 1965. Pada
tahun 1968 dan 1974, bahasa COBOL dikembangkan dan
distandarisasikan dengan nama ANSI COBOL (American National
Standarts Institute).
Bahasa pemrograman COBOL sangat terstruktur, karena mudah
dibaca dan memiliki struktur yang jelas.
COBOL dibuat untuk operasi pengolahan data, yaitu membaca data,
memproses data dan menghasilkan output berupa informasi.
Dasar-dasar COBOL.

Untuk membuat program COBOL yang baik dan benar, minimal anda
harus menguasai atau mengetahui beberapa hal berikut :

· Cara penulisan.
Kolom maksimal yang disediakan program COBOL adalah kolom 1
sampai 80, dengan ketentuan sebagai berikut :
Kolom 1-6 : digunakan untuk line number (optional) ditulis dari kecil ke
besar.
Kolom 7 : digunakan untuk melanjutkan baris sebelumnya dengan
menambahkan tanda (-) dan baris sambungannya ditulis di
area B.
Bila diisi (*) maka yang ditulis pada baris ini dianggap
komentar.
Kolom 8-11 : disebut dengan area A. untuk menulis divisi, section, nama
paragraph, judul file description (FD), level number 01 dan
level number 77.
Kolom 12-72 : disebut area B. untuk menulis elemen program selain yang
ditulis di area A.
Kolom 73-80 : kolom ini tidak akan diproses oleh program jadi data diisi
catatan atau curahan hati untuk dokumentasi.
Beberapa hal lagi yang anda harus perhatikan tentang penulisan yaitu
penggunaan titik dan spasi. Bahasa pemrogram COBOL sangat sangat
ketat tentang peraturan penulisan, pastikan anda memberikan tanda titik
(.) setelah nama divisi, section, paragraph atau baris instruksi dan spasi
(space) untuk pemisah antara COBOL RESERVED WORDS dengan
variable atau string.
Kedua hal tadi kelihatan sepele tapi jika program yang anda buat
panjang nya sampai puluhan baris hal ini mungkin dapat membuat anda
frustasi. Karena akan menyebabkan pesan kesalahan yang memusingkan
kepala.

Cara menjalankan program COBOL.
Program COBOL ini tidak memiliki built-in editor seperti Pascal atau
Basic sehingga anda harus mengetik dan mengkompile secara terpisah.
Untuk mengetik source program COBOL anda dapat menggunakan
sembarang text editor apakah itu MS-Editor, Notepad, SideKick dan lainlain
sesuai keinginan anda. Tetapi disarankan menggunakan SideKick
karena lebih cepat terutama pada saat proses debugging source program.

Cara penggunaan SideKick.
SideKick adalah suatu editor tool yang resident di memori, untuk
menjalankan SideKick, ketik :
C:\>SK
Setelah tampil jendela berwarna biru tekan CTRL+ALT maka akan keluar
menu pop-up pilih notepad.
Tekan F3 untuk membuat file baru (untuk cobol dengan extensi .COB) , F2
untuk menyimpan source program dan Ecs untuk ke DOS prompt.
Untuk mengkompile source program COBOL yang anda buat tekan F2 lalu
Ecs , ketikan:
C:\>COBOL nama_program.cob atau C:\>COBOL nama_program;
Untuk menjalankan (running) ketikan:
C:\>RUNCOBOL nama_program

Contoh Program Sederhana.
PRAK.COB Sun Aug 20 20:55:58 2006 Page 1
line number source line Microsoft COBOL Version 2.20
1 IDENTIFICATION DIVISION.
2 PROGRAM-ID. CONTOH.
3 AUTHOR. SAYA.
4 ENVIRONMENT DIVISION.
5 CONFIGURATION SECTION.
6 SOURCE-COMPUTER. IBM-PC.
7 OBJECT-COMPUTER. IBM-PC.
8 DATA DIVISION.
9 WORKING-STORAGE SECTION.
10 01 MASUKAN.
11 02 NAMA PIC X(20).
12 02 NPM PIC X(8).
13 SCREEN SECTION.
14 01 HAPUS-LAYAR.
15 02 BLANK SCREEN.
16 PROCEDURE DIVISION.
17 MASUKKAN-DATA.
18 DISPLAY HAPUS-LAYAR.
19 DISPLAY 'NAMA : '.
20 ACCEPT NAMA.
21 DISPLAY 'NPM : '.
22 ACCEPT NPM.
23 SELESAI.
24 STOP RUN.
25

Kamis, 22 November 2012


CARA MEMBUAT GAMBAR PAPRIKA PADA GIMP


  1. buka software gimp kemudian klik menu file dan pilih new.
  2. setelah klik new akan muncul tampilan seperti gambar di atas, kemudian ganti ukuran height pada image size menjadi 460 dan klik ok.
  3. setelah itu pilih paint brush pada menu toolbox dan pilih gambar paprika seperti gambar di atas.
  4. setelah itu pilih path pada menu toolbox untuk memberikan titik-titik pada layer agar dapat membuat sebuah gambar.
  5. buatlah gambar pada layer berbentuk huruf s seperti pada gambar di atas dengan menggunkan path pada menu toolbox.
  6.  setelah gambar berbentuk huruf s jadi kemudian klik edit.
  7.  setelah memilih edit pilih stroke path maka akan muncul tampilan seperti gambar di atas, kemudian pilih stroke.
  8. setelah pilih stroke akan muncul tampilan seperti gambar di atas.
  9. klik path tool kemudian akan muncul tool option kemudian klik background pada layer borders klik kanan pilih duplicate layar, kemudian pilih move pada tool option pilih selection from path, maka path akan bertambah seperti gambar di atas.







cara membuat sorting pada bahasa pemograman pascal



Nama      : M.HIDAYATURACHMAN
Npm        : 34111200
Kelas      : 2DB04 

Program sorting nama dengan menggunakan pascal



                                                                                                        



program sorting;
uses crt;
type
    mahasiswa = record
       nama : string [15];
       npm  : string [15];
       kelas: string[15];
       end;

var
 i,j,n : integer ;
 mhs : array [1..15] of mahasiswa;
 siswa : mahasiswa;


 const
    a=('====================================================');
    b=('NPM                   KELAS                     NAMA');
    c=('====================================================');

 procedure input;
 begin
 for i:= 1 to n do
  begin
    with mhs[i] do
     begin
     write(mhs[i].npm:0);
     write(mhs[i].kelas:20);
     write(mhs[i].nama:24);
     writeln;
     end;

  end;
  writeln(a);
 end;

 begin
 clrscr;

 write('jumlah mahasiswa : ');readln(n);

 for i :=1 to n do
 begin


 write('NPM:');readln(mhs[i].npm);
 write('KELAS:');readln(mhs[i].kelas);
 write('NAMA:');readln(mhs[i].nama);
 writeln;
 end;

 write('data semula');
 writeln(' ');
 writeln(a);
 writeln(b);
 writeln(c);


 begin
   input;
   end;

  {bubble sort}
  for i:= 1 to n-1 do
      for j:=i+1 to n do
      begin
      if mhs[i].nama > mhs[j].nama then
          begin
          siswa:=mhs[i];
          mhs[i]:=mhs[j];
          mhs[j]:=siswa;
          end;
       end;

  writeln;
  write('sorting berdasarkan nama');
  writeln(' ');
  writeln(b);
  writeln(a);
  writeln(c);


  begin
   input;
   end;

  writeln;
  write('selesai...');readln;


 readkey;
 end.