PENYELEkSIAN KONDISI (IF STATEMENT)

Penyeleksian Kondisi (IF STATEMENT)

   

    Pernyataan ini akan memeriksa suatu persyaratan dan menentukan apakah syarat tersebut benar atau salah, maka Pernyataan ini mengandung BOOLEAN.

   a. Penyeksian satu kasus dengan menggunakan struktur IF-THEN.
       IF dengan satu pernyataan (STATEMENT)
      
             IF (kondisi) THEN
        AKSI;

    Contoh :
      
              if (x>0) then
         writeln('x bilangan positif')

   b. Penyeleksian Dua Kasus dengan menggunakan struktur IF-THEN-ELSE 
       IF dengan dua atau lebih pernyataan (STATEMENT)
       
        IF (Kondisi) THEN
        Begin
           Aksi 1;
           Aksi 2;
           .............
        End;

    Contoh :

         if (x>0) then
         writeln('x bilangan positif');
         else
         writeln('x bukan bilangan positif');

   c. Penyeleksian Tiga Kasus atau Lebih (Penyeleksian Tersarang/NESTED IF)
       IF dan ELSE
       
        IF (Kondisi) THEN
        Begin
           Aksi 1;
           Aksi 2;
           ............
        End;
        Else
        Begin
           Aksi 1;
           Aksi 2;
           ............
        End;
       
      Contoh :

        program konversi_dari_angka_ke_huruf;
        uses crt;
        var
        nilai:integer;
        begin
        clrscr;
        write ('masukkan nilai :');readln(nilai);
        if nilai > 21 then
           begin
        if (nilai>21) and (nilai<=40) then
           begin
           writeln('D') ;
           end;
        if (nilai>41) and (nilai<=60) then
           begin
           writeln('C')  ;
           end;
        if (nilai>61) and (nilai<=80) then
           begin
           writeln('B')   ;
           end;
        if (nilai>81) and (nilai<=100) then
           begin
           writeln('A')   ;
        end;         
        end
        else
           begin
           writeln('E');
        end;
        readln;
        end.

SEKIAN..

Read More

MEMBUTA PROGRAM TENTANG PEMBAGIAN DAGING QURBAN

Langsung saja untuk membuat program pembagian daging qurban ketikan scrip di bawah ini pada turbo pascalnya..


Program Mengitung_Pembagian_daging_Qurban;
uses crt;
var BD, JPS, JPH, Q, PS, PH : real;
begin
    clrscr;
    writeln('MENGHITUNG PEMBAGIAN DAGING QURBAN');
    write ('Masukkan Berat Daging (kg)=  ');readln(BD);
    write ('Masukkan Jumlah Orang Penerima Sumbangan (orang)=  ');readln(JPS);
    write('Masukkan Jumlah Penerima Hadiah (orang)=  ');readln(JPH);
    Q:= 1/3*BD/JPS;
    PS:= 1/3*BD/JPS;
    PH:= 1/3*BD/JPH;
    writeln;
    writeln('Banyak Daging yang diterima Pengqurban (kg)= ', Q:0:2);
    writeln('Banyak Daging yang disumbangkan  per orang (kg)= ',PS:0:2);
    writeln('Banyak Daging yang dihadiahkan per orang (kg)= ', PH:0:2);
    readln;
end.

Jika sudah maka gambarnya akan seperti di bawah ini

Dan hasilnya akan seperti di bawah ini

Itulah program tentang pembagian daging qurban, menarik bukan..

Read More

MENGHITUNG LUAS SEGITIGA DENGAN TURBO PASCAL

     Program menghitung luas segitiga dengan turbo pascal:

Untuk membuat program menghitung luas segitiga ketikan scrib di bawah ini pada pascal :


program luas;
uses crt;
var a,t: integer;
      L: real;

begin
clrscr;
      write(‘Masukan Nilai Alas:’);readln (a);
      write(‘Masukan Nilai Tingi:’);readln(t);
      writeln;
      L:=(a*t)/2;
      writeln(‘Luas Segitiga adalah =’,L:6:2);
      readln;

end.


Jika sudah maka gambarnya akan seperti di bawah ini :

Dan hasilnya akan seperti di bawah ini :

Selesai...

Read More

INPUT, OUPUT DAN GOTOXY TURBO PASCAL

     Kali ini saya akan posting mengenai Input, Output dan Gotoxy pada turbo pascal secara singkat dan mudah di pahami , oke ndak usah lama - lama langsung saja.

 Setiap program aplikasi pasti membutuhkan operasi input dan output. Memasukkan data input secara interaktif merupaka ciri dari program-program aplikasi yang banyak ditemukan. Suatu program yang tidak dapat menghasilkan output, maka proses program tersebut akan sia-sia, karena

hasilnya tidak akan dapat dinikmati


1.  Perintah Read dan Readln

     Digunakan untuk meminta masukan dari keyboard untuk diolah komputer.
Tipe data yang dicetak dapat berupa Integer, Real, Character String ataupun Boolean. Perbedaan Read dan Readln adalah setelah meminta masukan. Jika Readlnakan diakhiri dengan pindah baris, sedangkan pada Read tidak.



2. Perintah Write dan Writeln

    Digunakan untuk mencetak hasil proses. Tipe data yang dicetak dapat berupa Integer, Real, Character Striing ataupun Boolean. Perbedaan Write dan Writeln adalah setelah mencetak. Jika Writeln akan diakhiri dengan pindah baris, sedangkan pada Write tidak.

Untuk lebih mudah memahaminya saya berikan contoh

program input;

uses wincrt;

var nm, npm : string;

begin

  writeln('Masukkan Nama Panjang   : ');readln(nm);

  writeln('Masukkan Nama Panggilan : ');readln(npm);

  Writeln('-------------------------------------------');

  write('Masukkan Nama Panjang    : ');readln(nm);

  write('Masukkan Nama Panggilan  : ');readln(npm);

end.

di bawah ini  adalah gambar progamnya yang saya tulis menggunakan turbo pascal

dan dibawah ini adalah hasil dari program di atas ketika di jalankan

Dapat dilihatkan perbedaanya kalau menggunakan writeln maka baris selanjutnya berada di bawa, jika menggunakan write maka barisnya hanya satu

3. Perintah Gotoxy

    Perintah Gotoxy di gunakan untuk mengarahkan kursor ke bagian tertentu pada layar. Pada layar monitor memiliki 80 karakter secara horizontal dan 25 karakter secara vertikal. 

Bentuk Umumnya :

GOTOXY(x,y);

x : menyatakan jarak dari sisi kiri monitor

y : menyatakan jarak dari sisi atas monitor

contoh sederhana:

uses wincrt;

begin

  gotoxy(5,3);write('Tulisan ini di mulai dari koordinat 5,3');

end.

dan hasilnya :

Itulah sekilas tentang input, output dan Gotoxy pada turbo pascal.

Read More

MENU - MENU TURBO PASCAL

Gambar di atas adalah area kerja dari Turbo Pascal 1.5 

Tampak sederhana tapi bagi yang belum memahami akan tertipu dengan kesederhanaannya he he..

Ada beberapa bagian yang terdapat dalam lembar kerja TPW ini. harap di baca, di hayati dan di pahami baik-baik, penjelasannya sebagai berikut.

Title Bar atau Baris Judul : menunjukan program & dokumen yang sedang aktif.
Menu  : merupakan perintah yang digunakan untuk operasional suatu program.
Tools menu : merupakan shortcut sehingga operasi dapat berjalan lebih cepat.

Baris Status : menunjukan operasi yang dilakukan dan melihat posisi kursor.


Dalam program Pascal terdapat 8 Menu, diantaranya :

File, Edit, Search, Run, Compile, Option, Window, Help alias tolong..

1. Menu File

      

     Menu File digunakan untuk mengatur program-program. Di dalam menu FILE terdapat beberapa sub menu, diantaranya :

• New : Untuk membuka dokumen program baru.
• Open : Untuk membuka dokumen yang pernah dibuat.
• Save : Untuk menyimpan dokumen.
• Save As : Untuk menyimpan dokumen dengan nama baru.
• Save All : Untuk menyimpan semua dokumen pascal yang sedang dijalankan.
• Print : Untuk mencetak lembar kerja pascal.
• Printer Setup : Untuk mengatur setup printer.
• Exit : Untuk keluar dari program TPW.

2. Menu Edit

        Menu Edit digunakan untuk perbaikan suatu program atau file. Di dalam menu EDIT terdapat beberapa sub menu, diantaranya :

• Undo : Membatalkan perintah terakhir.
• Redo : Mengulang perintah terakhir.
• Cut   : Memotong teks.
• Copy : Memasukan teks terblok ke dalam clopboard.
• Paste : Menampilkan hasil cut atau copy.
• Clear : Membuang hasil perintah cut dan copy.

3. Menu Search

     Menu Search digunakan untuk pencarian suatu program atau file. Di dalam menu SEARCH terdapat beberapa sub menu, diantaranya :

• Find: Untuk mencari kata tertentu.
• Replace: Untuk mencari atau mengganti kata tertentu.
• Search again: Untuk mencari kembali kata yang telah diganti.
• Go to line number: Untuk menuju baris tertentu.
• Show last compile error: Untuk menampilkan kesalahan compile.
• Find error: Untuk menunjukan alamat terjadinya kesalahan.

4. Menu Run

    Menu Run digunakan untuk menjalankan program. Di dalam menu RUN terdapat beberapa sub menu, diantaranya :

• Run : Untuk menjalankan program.
• Debugger : Untuk mengaktifkan file debugger.
• Parameters : Untuk menampilkan kotak dialog parameter

5. Menu Compiler

    Menu Compile digunakan untuk mengkompile sehingga menjadi file EXE. Di dalam menu COMPILE terdapat beberapa sub menu, diantaranya :

• Compile : Untuk mengkompile file.
• Make : Untuk mengkompile secara otomatis.
• Build : Untuk mengkompile pascal.
• Primery file : Untuk memberi file kunci.
• Clear primery file :Untuk menghilangkan file kunci.
• Information : Untuk menyampaikan informasi.

6. Menu Option

    Menu Options digunakan untuk mengubah tampilan-tampilan pada lembar kerja pascal. Di dalam menu OPTIONS terdapat beberapa sub menu, diantaranya :

• Compiler : Untuk mengetahui keadaan dokumen pascal yang sudah dicompile.
• Linker : Untuk membuat linker.
• Directories : Untuk menampilkan direktory / folder.
• Preference : Untuk mengubah tampilan font.
• Open : Untuk membuka dokumen pascal yang berektension CFG.
• Save TPW.CFG : Untuk menyimpan dengan format CFG.
• Save As : Untuk menyimpan dengan nama baru dengan format CFG.

7. Menu Windows

     Menu Window : untuk mengubah tampilan file yang diaktifkan di layar. Di dalam menu Windows terdapat beberapa sub menu, diantaranya :

• Cascading : Untuk tampilan menumpuk.
• Tile : Untuk tampilan secara horizontal/ sejajar.
• Arrange icon : Untuk menata icon.
• Close All : Untuk menutup semua dokumen yang sedang aktif.

8. Menu Help

    Menu Help : untuk meminta informasi/bantuan perintah & yang sejenisnya. Di dalam menu Help terdapat beberapa sub menu, diantaranya :

• Index : Untuk menampilkan berdasarkan index.
• Topic Search : Untuk menampilkan / mencari per topik.
• Using Help : Untuk menggunakan fasilitas help.
• Compile Directives : Untuk Compile directives.
• Objek Windows : Untuk Obyek windows.
• Procedure and Function : Untuk Procedur dan fungsi.
• Reserved words : Untuk kata khusus pascal.
• Standar units : Untuk unit standar.
• Turbo Pascal Language : Untuk bahasa Turbo Pascal.
• Windows APl : Untuk Windows APL.

Itulah Menu-menu yang terdapat dalam Lembar Kerja TPW. 

Read More

CARA MENJALANKAN TURBO PASCAL

     Sebelum menjalankan Turbo Pascal, pastinya kita harus punya dulu aplikasi turbo pascalnya, bagi yang belum punya silahkan download melalui link berikut 

Download TPW 1.5 

    Nah.. kalau sudah download langsung saja di instal dengan cara :

• klik file yang di download tadi 2 kali 
• Kemudian akan muncul kotak dialog seperti gambar berikut
  
• Klik instal, tunggu sebentar ndak sampai satu jam kok he he, 
  
• Klik OK, kira - kira akan muncul kotak saperti di atas 3 kali, klik trus saja OK 
  
• Pilih menu file, lalu klik new. Turbo Pascalpun sudah bisa digunakan.
• Selesai.

Jika kita ingin menjalankanya lagi cari saja folder masternya biasanya sih ada di drive C, cari dan pilih folder yang namanya TPW.

Kemudian klik 2 kali TPW exenya seperti gambar di atas.

SEKIAN..

Read More

ELEMEN - ELEMEN PASCAL

Sebelum kita membuat sebuah program, maka terlebih dahulu kita harus mengerti tentang elemen- elemen bahasa Program Pascal, seperti Reserved word, Statement, Type, Constants, Variabel, Tipe data, Label, Operator, dan lain-lain.

 1. Reserved Word

Reserved word adalah kata – kata yang tidak dapat dijadikan menjadi identifier (pengenal), karena kata – kat tersebut sudah mempunyai arti tersendiri dalam Turbo Pascal. Adapun kata – kata yang termasuk ke dalam identifier adalah : And, asm, array, begin, case, const, constructor, destructor, div, do, downto, else, end, exports, file, for, function, goto, if, implementation, in, inherited, inline, interface, label, library, mod, nil, not, object, of, or,packed, procedure, program, record, repeat, set, shl, shr, string, then, to, type, unit, until, uses, var, while, with, xor.

 2. Statement

Statement adalah salah satu dari berikut ini:

-          Assignment (:=)

-          Begin..end

-          Case..of..else..end

-          For..to/downto..do

-          Goto

-          If..then..else

-           Inline(..)

-          Procedure call

-          Repeat..until

-          While..do

-          With..do

c2. Type

Bentuk umum:

Type

Pengenal  = tipe data;

……….

Pengenal = tipe data;

 3. Const (Constant)

Constant yang disingkat dengan const adalah nilai konstanta ( nilai tetap) yang dipasang dalam program.

Bentuk umum:

Const

Pengenal = ekspresi

………

Pengenal = ekspresi

Const

Pengenal: type = nilai;

………..

Pengenal: type = nilai;

 4. Var ( Variabel)

Jika constant adalah nilai tetap, maka Variabel adalah nilai yang isinya dapat berubah – ubah. Dalam program, Variabel disingkat menjadi Var.

Bentuk umum:

Var

Pengenal, … pengenal : Tipe data;

……

Pengenal,… pengenal: Tipe data;

  5. Tipe Data
      Tipe data yang disediakan oleh PASCAL meliputi:
         1. Tipe Data Sederhana

merupakan tipe data dasar yang sering dipakai oleh program, meliputi: integer (bilangan bulat), real (bilangan pecahan), char (alphanumerik dan tanda baca), dan boolean (logika). Untuk data integer dan real masing-masing terbagi menjadi beberapa kategori

a. Bilangan Integer

merupakan tipe data berupa bilangan bulat, terbagi atas beberapa kategori seperti terlihat dalam tabel 1. tabel 1 menunjukkan jenis data, ukuran dalam memori dan rentang nilainya.

Contoh bilangan integer adalah: 34 6458 -90 0 1112 Penggolongan tipe data integer tersebut dimaksudkan untuk membatasi alokasi memori yang dibutuhkan misalkan untuk suatu perhitungan dari suatu variabel bilangan diperkirakan nilai maksimumnya 32767 kita cukup mendeklarasikan variabel bilangan sebagai integer (2 byte), daripada sebagai longint(4 byte). Di dalam kompilernya, Pascal menyediakan konstanta untuk bilangan Integer yaitu: MaxInt and MaxLongInt, pemrogram bisa menggunakannya di dalam programnya tanpa harus terlebih dahulu mendefinisikannya.

b. Bilangan Real

  Bilangan real atau nyata merupakan jenis bilangan pecahan, dapat dituliskan secara biasa atau model scientific . Contoh bilangan real: 34.265 -3.55 0.0 35.997E+11, dimana E merupakan simbol perpangkatan 10. Jadi 452.13 mempunyai nilai sama dengan 4.5213e2. Penggolongan tipe data bilangan real dapat dilihat pada tabel berikut.

c. Char


  Tipe data ini menyimpan karakter yang diketikkan dari keyboard, memiliki 266 macam yang terdapat dalam tabel ASCII (American Standard Code for Information Interchange). Contoh: 'a' 'B' '+', dsb. Yang perlu diingat bahwa dalam menuliskannya harus dengan memakai tanda kutip tunggal. Jenis data ini memerlukan alokasi memori sebesar 1(satu) byte untuk masing-masing data.


d. Tipe Data Boolean


   Merupakan tipe data logika, yang berisi dua kemungkinan nilai: TRUE (benar) atau FALSE (salah). Turbo Pascal for Windows memiliki tiga macam jenis ini yaitu: Boolean, WordBool, dan LongBool. Tipe boolean memakai memori paling kecil, sedangkan WordBool dan LongBool dipakai untuk menulis program yang sesuai dengan lingkungan Windows.

     2. Tipe Data Terstruktur

     Tipe ini terdiri atas array, record, set, dan file. String adalah tipe data jenis array, tetapi karena string memiliki kekhasan tersendiri sebagai array dari karakter maka penulis perlu memberikan penjelasan tersendiri. Sedangkan untuk array, record, dan file perlu dijelaskan dalam bab yang lain karena agak banyak hal-hal yang perlu dibahas.

 6. Label 

 Label adalah suatu deklarasi untuk membuat percabangan dalam proram. Label  bisa berupa huruf, misalnya: AWAL, AKHIR, atau angka antara 0 and 999. Dan  untuk menuju kelabel yang telah dideklarasikan harus menggunakan instruksi  GOTO.

 Bentuk umum:

 Label pengenal,….. pengenal;

 7. Operator

Operator adalah lambing- lambing untuk melakukan perkalian, penjumlahan dan lain- lain seperti dalam kalkulator. Tetapi operator dalam computer lebih kompleks dibandingkan kalkulator. Jenis-jenis operator:

•     Operator penghubung ( relational operators )
•     Operator arithmatik ( arithmetic operators )
•     Operator logika ( logical operators )
•     Operator pembanding ( Boolean operators )
•     Operator string ( string operators )
•     Operator set ( set operators )
•     Operator @ ( @ operators )
•     Operator Pchar ( Pchar operators )

Read More