MENGENAL PASCAL

							                      MENGENAL PASCAL

1. Pendahuluan
   - Pascal adalah bahasa tingkat tinggi (high level Language)
   - Dirancang oleh Profesor Niklaus Wirth dari Technical University
      di Zurich, Switzerland tahun 1971
   - Bertujuan untuk membantu mengajar program computer secara
      sistematis    dan    memperkenalkan     pemrograman      yang
      terstruktur.
2. Struktur Program Pascal
   - Judul Program (Program Heading)
   - Blok Deklarasi (Declaration Block)
       Deklarasi Unit
       Deklarasi Label
       Deklarasi Konstanta
       Deklarasi Tipe
       Deklarasi Variabel
       Deklarasi Modul (Prosedur dan Fungsi)
   - Program Utama (Main Program)
3. Program Sederhana
   - Program yang hanya terdiri dari program utama saja.
   - Diawali dan diakhiri reserved word BEGIN dan END.
   - Contoh :
      $begin
             Statement 1;
             Statement 2;
             …
             …
      End.
4. Penulisan Program Pascal
   Program contoh_penulisan_pascal;

  Begin
    Writeln(‘SAYA PASCAL’);
    writeln(‘-----------‘);
    Writeln(‘SAYA BAHASAPEMROGRAMAN’);
    Writeln(“SAYA SEDANG’);
    Writeln(‘BELAJAR BAHASA PEMROGRAMAN’);
    Writeln(‘PASCAL’);
  End.
5. Bagian Deklarasi
   - Deklarasi label
      Digunakan untuk meloncat ke suatu statement tertentu
      Dibutuhkan suatu label pada statement yang dituju, dan
        label tersebut harus dideklarasikan terlebih dahulu
      Contoh :
     Program contoh_label;
     Label
        100,selesai;
     Begin
        Writeln(‘Bahasa’);
        Goto 100;
        Writeln(‘Basic’);
     100:
        Writeln(‘Pascal’);
        Goto selesai;
        Writeln(‘Cobol’);
     Selesai
     End.
   - Deklarasi Variabel dan Konstanta
      Konstanta merupakan pengenal berisi data yang nilainya
        tidak berubah-ubah didalam program
      Defenisi konstanta diawali dengan const
      Variabel adalah pengenal yang berisi data yang bisa
        mengalami perubahan terhadap nilainya
      Defenisi variabel diawali dengan var
      Contoh 1:
     Program contoh_var_konstanta;
     Var
        Total,tunjangan :real;
     Const
        Nama=’test’;
        Gaji=250000;
     Begin
        Total:=0; Tunjangan:=100000;
        Total:=gaji+tunjangan;
        Writeln(‘Nama :’,nama); Writeln(‘Total Gaji
        :’,total:7:0);
     End.
 Contoh 2:
Program contoh_dua;
Var
   Nim            : string[10];
   Nama           : string[30];
   Matakuliah     : string[20];
   Nilai_absen    : integer;
   Nilai_midtest: integer;
   Nilai_finaltest:integer;
   Nilai_akhir    : real;
   Grade          : char;
Begin
   Nim:=9911500099’;
   Nama:=’budi rahmanto’;
   Matakuliah:=’Pascal’;
   Nilai_absen:=70;
   Nilai_midtest:=70;
   Nilai_finaltest:=70;
   Grade:=’B’;
   Nilai_akhir:=(nilai_absen+nilai_midtest+nilai_finalt
   est)/3;
   Writeln(‘Nim                :’,nim);
   Writeln(‘Nama               :’,nama);
   Writeln(‘Matakuliah         :’,matakuliah);
   Writeln(‘Nilai Akhir        :’,nilai_akhir:3:2);
   Writeln(‘Grade              :’,grade);
End.
 Simpan dengan nama tugas2.pas
 Latihan :
 Buat sebuah program baru untuk input data gaji
   pegawai (nip, nama, alamat, gapok, tunjangan).
 Hitung gaji_bersih := gapok+tunjangan
 Tampilkan ke layer sbb :
   Data Gaji Pegawai
   =================
   Nip               : X-5-X
   Nama              : X-30-X
   Alamat            : X-50-X
   Gaji Pokok        : 9999999
   Tunjangan         : 9999999
                     ----------+
   Gaji Bersih       : 9999999