Interaksi Manusia dan Komputer:Ragam Dialog 2: Difference between revisions

No edit summary
No edit summary
 
(8 intermediate revisions by the same user not shown)
Line 1: Line 1:
[[File:Interaksi manusia dan comp 3.png|thumb|334x334px]]
==Dialog Berbasis Bahasa Alami==
==Dialog Berbasis Bahasa Alami==
Dialog berbasis bahasa alami merupakan dialog yang menggunakan bahasa yang mudah dimengerti oleh manusia.  
Dialog berbasis bahasa alami merupakan dialog yang menggunakan bahasa yang mudah dimengerti oleh manusia.  
Line 4: Line 6:
Contoh : cetak data mahasiswa yang memiliki ipk > 3.0.
Contoh : cetak data mahasiswa yang memiliki ipk > 3.0.


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


while not eof (T) do
<syntaxhighlight lang="pascal">
while not eof (T) do
  begin
  begin
     readln(T,S) ;
     readln(T,S) ;
     if S.IpSem >3.0 then
     if S.IpSem >3.0 then
       writeln(S,NamaMahaiswa);
       writeln(S,NamaMahaiswa);
end;
end;
</syntaxhighlight>


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


'''Contoh''':
'''Contoh''':
Type
 
Tanggal = 1 .. 31;  
<syntaxhighlight lang="pascal" line="1">
bulan = 1 .. 12;
Type
Tanggal = 1 .. 31;  
bulan = 1 .. 12;
</syntaxhighlight>


===Enumerated (skalar)===
===Enumerated (skalar)===
Line 83: Line 90:
Cara Mencetak suatu variabel :
Cara Mencetak suatu variabel :
===Tidak perlu tanda petik===
===Tidak perlu tanda petik===
Uses wincrt;
 
Var A : integer;
<syntaxhighlight lang="pascal" line="1">
Begin
Uses wincrt;
  A:= 9;
Var A : integer;
  Writeln(A);
Begin
End.
  A:= 9;
  Writeln(A);
End.
</syntaxhighlight>


===Dengan tanda koma===
===Dengan tanda koma===
Var A : integer;
 
Begin
<syntaxhighlight lang="pascal" line="1">
A:= 9;
Var A : integer;
Writeln(‘Nilai A adalah ’, A);
Begin
End.
A:= 9;
Writeln(‘Nilai A adalah ’, A);
End.
</syntaxhighlight>


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


Write(‘Sedang Belajar Pascal’); atau
<syntaxhighlight lang="pascal" line="1">
Writeln(‘Sedang Belajar Pascal’);
Write(‘Sedang Belajar Pascal’); atau
Writeln(‘Sedang Belajar Pascal’);
</syntaxhighlight>


Jika menggunakan write, setelah mencetak kata – kata atau variable, kursor akan diletakkan di samping hasil cetakan.
Jika menggunakan write, setelah mencetak kata – kata atau variable, kursor akan diletakkan di samping hasil cetakan.
Line 109: Line 124:
===Read/ReadLn===
===Read/ReadLn===
Read atau readln digunakan untuk menerima masukan dari user untuk disimpan ke dalam suatu variable.
Read atau readln digunakan untuk menerima masukan dari user untuk disimpan ke dalam suatu variable.
Var A: Integer;
 
Begin
<syntaxhighlight lang="pascal" line="1">
Write(‘Masukkan nilai A: ’);readln(A);
Var A: Integer;
Writeln(‘Nilai yang anda masukkan adalah: ’, A);
Begin
End.
Write(‘Masukkan nilai A: ’);readln(A);
Writeln(‘Nilai yang anda masukkan adalah: ’, A);
End.
</syntaxhighlight>


===Komentar===
===Komentar===
Line 124: Line 142:


'''Contoh''':
'''Contoh''':
Uses wincrt;
 
<syntaxhighlight lang="pascal">
Uses wincrt;
</syntaxhighlight>


===Statement If..Else===
===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
*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
<syntaxhighlight lang="pascal">
If…Then
</syntaxhighlight>


If…Then..Else…
<syntaxhighlight lang="pascal">
If…Then..Else…
</syntaxhighlight>


If…Then..Else..If..Then..Else…
<syntaxhighlight lang="pascal">
If…Then..Else..If..Then..Else…
</syntaxhighlight>


===Statement Case===
===Statement Case===
If…Then..Else..If..Then..Else… bisa digunakan fungsi Case
<code>If…Then..Else..If..Then..Else…</code> bisa digunakan fungsi Case
Case … of
 
……. : ……..
<syntaxhighlight lang="pascal">
……. : ……..
Case … of
……. : ……..
……. : ……..
</syntaxhighlight>


'''Contoh''':
'''Contoh''':


Uses wincrt;
<syntaxhighlight lang="pascal" line="1">
Var Pilihan : integer;
Uses wincrt;
begin
Var Pilihan : integer;
  writeLn('Ada 1 sampai 5 pilihan.');
begin
  writeLn('Pilihan anda adalah');readln(Pilihan);
  writeLn('Ada 1 sampai 5 pilihan.');
  Case Pilihan of
  writeLn('Pilihan anda adalah');readln(Pilihan);
  1 : writeln('Anda memilih 1');
  Case Pilihan of
  2 : writeln('Anda memilih 2');
  1 : writeln('Anda memilih 1');
  3 : writeln('Anda memilih 3');
  2 : writeln('Anda memilih 2');
  4 : writeln('Anda memilih 4');
  3 : writeln('Anda memilih 3');
  5 : writeln('Anda memilih 5');
  4 : writeln('Anda memilih 4');
  end;
  5 : writeln('Anda memilih 5');
end.
  end;
end.
</syntaxhighlight>
 
__NOINDEX__
[[Category:Materi]]
[[Category:Matkul]]
[[Category:Interaksi Manusia dan Komputer]]