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.