Contoh Program Pascal III

Program contoh_4;

Uses Wincrt;
const
akhir = 4;
var
baris,kolom : integer;

begin
    clrscr;
    for baris := akhir downto 1 do
    begin
    for kolom := 1 to baris do
    write(kolom);
    writeln;
    end;
readln;
end.

Hasil :
1234
123
12
1


Program contoh_5;

Uses Wincrt;
const
       akhir = 4;
var
      baris,kolom : integer;
begin
        clrscr;
        for baris := akhir downto 1 do
        begin
        for kolom := baris downto 1 do
        write(kolom);
        writeln;
        end;
readln;
end.
Hasil :
4321
321
21
1

 
Baik sekarang kita masuk ke tahap penjelasan tentang statement di atas.
Statement kali ini membahas tentang "For to do". Yaitu statement perulangan yang digunakan untuk mengulang statement atau satu blok statement berulang kali sejumlah yang ditentukan.
Kalau belum paham silahkan bertanya melalui komen atau email saya.

Contoh Program Pascal II

Sekarang Saya akan membahas tentang " IF THEN ELSE AND".
mungkin ini sedikit asing karena dimana-mana cuma " IF THEN ELSE"..
Itulah saya belajar kreatif dan efisien..hehehe,,
Oke gak pake panjang lebar kita menuju TKP.!!

Contoh ketiga :

1:  Program contoh_3;

2:  uses wincrt;   
   
4:   var bil: longint;

5:          begin

6:          writeln(‘MENENTUKAN JENIS BILANGAN’);

7:          writeln(‘-------------------------’);

8:          write(‘Masukkan angka: ‘);
  
9:          readln(bil);

10:              if ((bil=2) or (bil=3) or (bil=5) or (bil=7)) then

11:               write(‘bilangan prima’)

12:               else if ((bil mod 2 <> 0) and (bil mod 3 <> 0)and

                 (bil mod 5 <> 0) and (bil mod 7 <> 0)) then

13:               write(‘bilangan prima’)

14:                     else
                        write(‘bukan bilangan prima’);

15:                         if bil mod 2 = 0 then

16:                         writeln(‘ dan genap’)

17:                            else

18:                            writeln(‘ dan ganjil’);

19: readln;

20: end.




Penjelasan untuk no.1 s/d no.9 mungkin sudah pernah kita bahas di pembahasan sebelumnya.
Sedangkan no.10 terdapat ststement IF. Fungsinya adalah untuk melakukan suatu perintah tertentu bila telah terpenuhinya suatu syarat.
Lalu apa fungsi "or" dan "and" pada IF yang terdapat pada no.10 dan no.12..?
Statement tersebut berfungsi untuk pemilihan didalam suatu statetment.
Selanjutnya statement "then" dan "Else" setelah  statement IF berfungsi saling melengkapi.
Else akan melakukan 'aksi' jika kondisi pertama 'salah'.Berikut logika sederhananya.
jika kondisi 'terpenuhi' maka lakukan aksi.dan jika kondisi 'tidak terpenuhi' lakukan 'aksi' pada 'else'.

Contoh Program Pascal

Sekarang Saya akan sedikit memberi contoh program pascal sederhana dan penjelasannya.
Program Kosong adalah program yang paling sederhana, karena tidak melakukan apa pun. Dalam bahasa Pascal, program kosong dibuat dengan cara sebagai berikut :

Program ; {instruksi untuk memulai program}

uses crt ; {instruksi untuk memanggil unit library pascal pada DOS,sedangkan pada Windows wincrt}

begin  {instruksi untuk mengawali program Pascal}

end.  {instruksi untuk mengakhiri program Pascal diikuti Operator Akhir Program}

contoh pertama :

program contoh_1; 

uses crt;
begin
   Clrscr; {membersihkan layar}
   writeln('Halo Pembaca');
end.

Ada sebuah instruksi baru di sini, yaitu instruksi writeln yang gunanya untuk mencetak lalu menambahkan Enter/baris baru (write and add new line, writeln berasal dari write + ln, ln merupakan singkatan dari line). Instruksi writeln ini disertai dengan parameter teks Halo Pembaca yang harus diapit oleh tanda petik tunggal ( ' ).

Oke,,coba anda Compile..jika berhasil akan muncul gambar berikut..

coba sekarang anda 'Run'..loh kok gak ada tampilan apa-apa??

Itu wajar karena ini program pertama..

Itu adalah program pertama kita.. jika sukses ayo kita lanjut program selanjutnya .

contoh kedua :

program contoh_2;

uses crt;

begin
   Clrscr;
     writeln('Halo Pembaca');
readln; {membaca / menampilkan isi program}
end.

setelah anda selesai mengetik silahkan anda Compile..jika berhasil lanjut anda 'Run'
ini adalah tampilan jika program anda berhasil.

Setelah program tersebut dijalankan, maka komputer akan mencetak kata Halo Pembaca di layar.
Ini karena kita menambahkan sintaks 'readln' yang berarti membaca atau menampilkan apa yang telas kita tulis di dalam sintaks 'begin'.

Program sederhana telah kita buat.Sekarang kita naik ketingkat berikutnya.
Variabel adalah suatu lokasi/tempat di dalam memori komputer yang bisa dipakai untuk menyimpan nilai. Variabel ini melambangkan atau merepresentasikan data.
Nilai dari sebuah variabel dapat dimasukkan oleh pengguna melalui deklarasi di program ataupun pemasukan (input) di dalam program.
Untuk setiap data yang berbeda, dibutuhkan variabel yang berbeda pula. Variabel dibedakan dengan cara diberikan nama yang berbeda. Contohnya, apabila terdapat data "panjang", "lebar", dan "tinggi", maka dapat dipakai variabel "p", "l", dan "t" untuk melambangkannya.
Tipe data dari sebuah variabel harus dideklarasikan di awal program. Beberapa contoh tipe data untuk menampung angka adalah byte, integer, word, dan real. Dalam program Pascal, kita dapat melakukan operasi matematika seperti tambah, kurang, kali, dan bagi.

Contoh Ketiga :

program contoh_3;

uses crt;

var
   p,l,t,v:integer;  {Deklarasi variable dengan  semua variable bertipe integer}begin
   writeln('Masukkan nilai panjang');
   readln(p);                        {Input nilai p}
   writeln('Masukkan nilai lebar');
   readln(l);                        {Input nilai l}
   writeln('Masukkan nilai tinggi');
   readln(t);                        {Input nilai t}
  
   v := p * l * t;      {Operasi matematika : v = p kali l kali t}
  
   writeln(v);                       {Tampilkan nilai v}
  
readln;                          
end.

Sampai disini dulu perjumpaan kita.
Bersiap untuk program selanjutnya.
Salam mari-berilmu.

Mari Mengenal Program Pascal

Sejarah Pascal

            Berakar dari Bahasa Algol dan PL/1 pada tahun 1960-an di benua Eropa, pada tahun 1970 dan dipublikasikan tahun 1971, Diujicoba pada Komputer CDC 6000 Turbo Pascal bersifat Compiler dan termasuk bahasa tingkat tinggi.
Pascal merupakan program yang telah lama ada dan sudah dimakan usia,namun tetap diminati untuk pembelajaran.
Pascal dirancang oleh Prof. Niklaus Wirthdari Switzerland.
Pascal adalah bahasa pemograman tingkat tinggi karena pascal adalah bahasa pemograman yang terstruktur. Dan nama pascal diambil dari nama seorang ahli matematika Blaise Pascal.

Memulai Pascal :

Ada beberapa cara untuk memulai Pascal,ini karena Pascal tidak compatible  pada setiap Sistem Operasi.

berikut sedikit cara yang saya tahu :

1. Menjalankan pada Windows XP 32 bit :

• Download Program Pascal disini.
• Pilih sesuai perangkat yang anda gunakan.
• Instal Pascal yang telah di download.
• Jika ada menu Shotcut pada dekstop klik TPX.exe atau turbo pascal.exe
• Jika tidak ada buka directori tempat anda menginstal.
• Contoh : C:\program file\turbo pascal\bin\tpx.exe
• Jika aplikasi masih belum bisa berjalan maka gunakan command prompt.
• Klik Start > All program > accessories >  command prompt. 
• Atau klik Start > Run > ketik 'cmd' (tanpa tanda koma').
• Kemudian ubah ke direktori anda menginstal Turbo Pascal.
• Contoh : C:\program file\turbo pascal\bin\tpx.exe.
• Tekan enter
2. Menjalankan pada Windows Vista dan 7 32 bit :
   • Hampir disemua OS ini pascal tidak bisa di buka langsung,berikut cara mengatasinya :
   • Klik Start > All program > accessories >  command prompt. 
   • Atau klik Start > Run > ketik 'cmd' (tanpa tanda koma').
   • Kemudian ubah ke direktori anda menginstal Turbo Pascal.
   • Contoh : C:\program file\turbo pascal\bin\tpx.exe.
   • Tekan Enter
3. Menjalankan pada Windows XP 64 bit,Vista 64 bit,win 7 64 bit :

• Biasanya pascal tidak bisa dijalankan langsung atau menggunakan Command prompt. Anda harus menggunakan software tambahan seperti DosBox. Silahkan download  DosBox pilih untuk windows.
• Aplikasi ini tidak jauh beda dengan Command Prompt,hanya saja direktori awalnya adalah Z:\ .Anda harus mount driver dimana anda menyimpan Pascal.
• contoh mount c c:\
• Kemudian ketik kembali driver tempat anda menaruh folder Pascal untuk berpindah direktori
• contoh : C:
• Setelah itu ketik perintah untuk menjalankan
• contoh : C:\program file\turbo pascal\bin\tpx.exe
• Maka Turbo Pascal pun akan muncul.

Memulai membuat program baru :

· File-New

· Menyimpan File:

· File-Save-Ketik nama file

· Jelaskan!Struktur Program Pascal :

Struktur Bahasa Pascal

§ Judul

Program <judulnya>;

Uses <unitnya>;

§ Bagian Deklarasi

Label <namalabelnya>;

Const <nama=nilai constantanya>;

Type <namatype:typedatanya>;

Var <nama_variabelnya>;

Procedure <nama_prosedurnya>;

Function <nama_fungsinya>;

§ Bagian Pernyataan

Begin

<pernyataan-pernyataan>;

End.

1. Judul Program

2. Blok Program, terdiri dari :

§ Bagian Deklarasi : variabel, konstanta, label, tipe, fungsidll

§ Bagian Pernyataan : Diawali dengan Begin dan diakhiri dengan End./ isi program :

· Compile/Compiling, Proses untuk mengecek kesalahan instruksi program apakah sudah benar/belum. Caranya : Compile-compile / Alt+F9

· Run, Proses untuk mengcompile sekaligus menjalankan program. Caranya : Run-run / Ctrl+F9

· Menampilkan hasil program : ALT+F5

· Membersihkan layar/tampilan : Clrscr (Clear Screen), dengan menggunakan prosedur Uses Crt (Uses Catode Ray Tube).

· Extentation Pascal :.PAS

II.1. Perintah I/O

Memasukkan data/input : Read=Memasukkan data dlm baris yg sama. Readln=Memasukkan data per baris.

Menampilkan hasil/output : Write=Menampilkan output dlm baris yg sama. Writeln=Menampilkan output perbaris.

II.2. Variabel dan Konstanta

Variabel adalah data yg nilainya berubah-rubah di dalam program.

BU : Var Identifier: tipe data.

Konstanta adalah data yg nilainya tetap di dalam program.

BU : Const Identifier=nilai.

II.3. Reserved Word/Kata Cadangan

•  merupakan kata-kata yang telah didefinisikan oleh turbo pascal. Contoh : Program Begin, End, Var, Const dll.

Sekian yang dapat saya sampaikan . Di pembahasan selanjutnya saya akan memberi contoh Program pascal dari yang sederhana hingga yang sulit. (insya allah).
Jika ada pertanyaan atau komentar silahkan tulis.Saya akan coba membantu.


Salam berbagi-ilmu.