Interaksi Manusia dan Komputer:Ragam Dialog 2

Dialog Berbasis Bahasa Alami

Dialog berbasis bahasa alami merupakan dialog yang menggunakan bahasa yang mudah dimengerti oleh manusia.

Contoh : cetak data mahasiswa yang memiliki ipk > 3.0.

Kemudian bahasa tersebut diterjemahkan ke dalam instruksi yang bisa di mengerti komputer, seperti turbo Pascal.

while not eof (T) do
 begin
    readln(T,S) ;
    if S.IpSem >3.0 then
       writeln(S,NamaMahaiswa);
end;

Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971.

Kelebihan Pascal

• Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada kebanyakan bahasa pemrograman.
• User defined Data Types, programmer dapat membuat tipe data lain.
• Strongly-typed, programmer harus menentukan tipe data dari suatu variabel.
• Terstruktur, memiliki sintaks yang memungkinkan penulisan program dipecah menjadi fungsi-fungsi kecil (procedure dan function) yang dapat dipergunakan berulang-ulang.
• Sederhana dan Ekspresif, memiliki struktur yang sederhana dan sangat mendekati bahasa manusia (bahasa Inggris) sehingga mudah dipelajari dan dipahami.
• Sebagai standar bahasa pemrograman bagi tim nasional Olimpiade Komputer Indonesia (TOKI) & IOI (International Olympiad in Informatics).

Bagian-Bagian Pada Pascal

• Kepala Program
• Deklarasi
• Pernyataan/Statement

Tipe Data pada Pascal

Tipe data dengan nilai bulat (Integer)

Tipe data	Keterangan
Byte	0 to 255
Word	0 to 65535
Integer	-32768 to 2147483647
Shortint	-128 to 127

Tipe data dengan nilai semua karakter ASCII (Char)

Tipe data dengan nilai pecahan (Real)

Tipe data	Keterangan
Real	2,9 x 10-38....1,7 x 1038
Single	1,5 x 10-45....3,4 x 1038
Double	5.0 x 10-324.....1,7 x 10308
Extended	3,4 x 10-4932....1,114932
Comp	-263 + 1 .... 263 - 1

Tipe data dengan nilai true dan false (Boolean)

User-Defined Data Type

Subrange

• suatu range yang menunjukkan nilai terkecil dan nilai terbesar yang dapat dipergunakan
• Type, pengenal = konstanta1 .. konstanta2;

Contoh:

Type
Tanggal = 1 .. 31; 
bulan = 1 .. 12;

Enumerated (skalar)

• menunjukkan kumpulan dari nilai yang urutannya sudah pasti.
• Type, bahasa = (delphi, java, c, pascal, basic);

Input/Output

Cara Mencetak suatu variabel :

Tidak perlu tanda petik

Uses wincrt;
Var A : integer;
Begin
  A:= 9;
  Writeln(A);
End.

Dengan tanda koma

Var A : integer;
Begin
A:= 9;
Writeln(‘Nilai A adalah ’, A);
End.

Write / WriteLn

Perintah ini digunakan untuk mencetak kata-kata atau variable ke layer komputer. Contoh untuk mencetak “Saya Belajar Pascal”

Write(‘Sedang Belajar Pascal’); atau
Writeln(‘Sedang Belajar Pascal’);

Jika menggunakan write, setelah mencetak kata – kata atau variable, kursor akan diletakkan di samping hasil cetakan.

Jka menggunakan perintah writeln, setelah mencetak kata – kata atau variable, kursor akan dipindahkan ke bawah satu baris dengan posisi horizontal pada awal baris.

Read/ReadLn

Read atau readln digunakan untuk menerima masukan dari user untuk disimpan ke dalam suatu variable.

Var A: Integer;
Begin
Write(‘Masukkan nilai A: ’);readln(A);
Writeln(‘Nilai yang anda masukkan adalah: ’, A);
End.

Komentar

Komentar adalah bagian dari program yang tidak akan diproses oleh compiler (Free Pascal).

Dengan symbol // untuk satu baris atau {…} untuk lebih dari satu baris

Unit

Unit ini menyimpan fungsi dan prosedur standard yang sudah didefinisikan oleh pembuat compiler. Beberapa unit standard yang ada dalam Pascal adalah Crt, System, Graph, Dos, Printer, dan Overlay.

Contoh:

Uses wincrt;

Statement If..Else

• Struktur percabangan atau sering disebut dengan struktur kontrol ini memungkinkan programmer untuk membuat program yang dapat memilih satu langkah di antara sejumlah langkah untuk dikerjakan

If…Then

If…Then..Else…

If…Then..Else..If..Then..Else…

Statement Case

If…Then..Else..If..Then..Else… bisa digunakan fungsi Case

Case … of
……. : ……..
……. : ……..

Contoh:

Uses wincrt;
Var Pilihan : integer;
begin
  writeLn('Ada 1 sampai 5 pilihan.');
  writeLn('Pilihan anda adalah');readln(Pilihan);
  Case Pilihan of
  1 : writeln('Anda memilih 1');
  2 : writeln('Anda memilih 2');
  3 : writeln('Anda memilih 3');
  4 : writeln('Anda memilih 4');
  5 : writeln('Anda memilih 5');
  end;
end.