headline photo
Showing posts with label Pascal. Show all posts
Showing posts with label Pascal. Show all posts

Struktur Kendali CASE

Tuesday, 3 December 2019

CASE digunakan untuk memilih diantara banyak pilihan. 



















Pernyataan CASE digunakan untuk menyederhanakan  konstruksi  if..else if yang terlalu 
banyak. Secara sederhana, struktur percabangan CASE mirip seperti struktur IF THEN 
ELSE yang berulang. Jika di dalam IF THEN ELSE kita memiliki format penulisan seperti 
berikut:
IF (kondisi1) THEN
  (kode program 1)
ELSE IF (kondisi2)  THEN
  (kode program 2)
ELSE IF (kondisi3)  THEN
  (kode program 3)
Maka di struktur CASE, format penulisannya seperti ini:
CASE (expression) OF
  kondisi 1 : (kode program 1);
  kondisi 2 : (kode program 2);
  kondisi 3 : (kode program 3);
end;
Expression adalah ‘sesuatu’ yang akan di periksa nilainya. Jika nilai dari expression ini sama dengan kondisi 1, maka yang dijalankan adalah (kode program 1), jika sesuai dengan kondisi 2, maka yang akan dijalankan adalah (kode program 2), dst.

Untuk materi dan contoh Silahkan download disini

Software Pemograman Menggunakan Turbo Pascal

Thursday, 18 October 2018

Di bawah ini adalah link untuk download softcopy Turbo Pascal

Silahkan download disini!

Setelah di download, langkah selanjutnya adalah extract folder tersebut.
Untuk menjalankannya pilih File TPX yang typenya Application seperti gambar dibawah ini

 Setelah kita Klik file tersebut maka akan muncul tampilan berikut 


 Setelah itu Tekan OK, dan Turbo Pascal siap digunakan.



Pert 2: Praktek Identifier, Type Data dan Operator

Listing Program


}program pertamaku;
}uses crt;
}var
}begin
}clrscr;
}write ('Hallo, Selamat datang !!! ');
}write ('Mari kita Belajar ');
}write ('TERIMAKASIH');
}end.
setelah siap diketikan listing programnya, langkah selanjutnya adalah menjalankan/eksekusi program dengan cara Ctrl+ F9 atau dari Menu Run Pilih Run.



Silahkan download disini!

Pert 1 : Praktek Pengenalan Bahasa Pemrograman Turbo Pascal

Pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971 dari Technical University di Zurich, Switzerland.
orientasinya pada segala tujuan.
termasuk kategori “High Level Language”.
Instruksi-instruksi yang digunakan sangat sistematis dan terstruktur.
Hasil pengembangannya :

  N UCSD Pascal.  ` Microsoft Pascal.N

  N Apple Pascal. N Turbo Pascal.

Silahkan download disini!

Contoh

Listing Program


program pertamaku;
uses crt;
var
begin
clrscr;
write ('Hallo, Selamat datang !!! ');
write ('Mari kita Belajar ');
write ('TERIMAKASIH');
end.



Maka hasilnya adalah :





Pert 6 : STRUKTUR KENDALI II (LOOPING)


Di dalam pemrograman terdapat beberapa bentuk perulangan. Setiap pemrograman  memiliki bentuk yang berbeda-beda. Yang akan dibahas disini yaitu pada perulangan pemrograman pascal yang menggunakan 
  •        For…Do
  •        While…Do dan 
  •       Repeat…Until 



 Digunakan untuk mengulang statement atau satu blok statement berulangkali sejumlah yang ditentukan tanpa suatu kondisi.
For..do terdiri atas dua jenis
1. For..Do… Positif
  Perulangan dimana nilai awal lebih kecil dibanding nilai akhir
2. For Do.. Negatif
  Perulangan dimana nilai awal lebih besar dibanding nilai akhir

Silahkan download disini!

Pert 4 : STRUKTUR KENDALI


Terdapat 3 proses eksekusi utama di dalam structure programming, yaitu :
1. Proses secara ‘Sequential’ (berurutan)
2. Proses secara ‘Selection/Decision’    (menggunakan statement kendali)
3. Proses secara ‘Repetition’


1. Proses secara ‘Sequential’ (berurutan)
Proses secara sequential terjadi bila proses berjalan dari atas ke bawah dan dikerjakan dari baris-perbaris. Proses sequential dapat digambarkan seperti dibawah ini. Proses A dikerjakan dahulu, setelah selesai dilanjutkan ke proses B.
Dengan kata lain proses dikerjakan urut kebawah 

Silahkan download disini!

Pert 3 : IDENTIFIER, TIPE DATA, OPERATOR

NAMA PENGENAL (IDENTIFIER)
dipakai sebagai pengidentifikasi ‘sesuatu’ dan program mengacu/memproses ‘sesuatu’ itu melalui namanya. Kata lain dari pengenal yaitu identifier yaitu suatu pengenal yang didefinisikan pemakai berguna untuk menampung data.

Silahkan download disini!

UTS 2018 "Penggunaan Fungsi IF dan CASE

Wednesday, 16 May 2018

program UTS2018;
Uses crt;
Var
Nm, Npm, kelas, kd_mk, nm_mk, ket : string;
na : byte;
nh : char;

Begin
Textcolor (RED);
Clrscr;
Writeln("*** UTS STMIK  KRISTEN NEUMAN INDONESIA***");
Write("NPM ="); readln(npm);
Write("NAMA="); readln(nm);
Write("KELAS="); readln(kelas);

write("input kode matakuliah :"); readln(kd_mk);
     if kd_mk ="AP"   then nm_mk:="Algoritma Pemograman"
else if kd_mk ="BIG"  then nm_mk:="Bahasa Inggris"
else if kd_mk ="BIND" then nm_mk:="Bahasa Indonesia"
else if kd_mk ="MM"   then nm_mk:="Matematika";
writeln("Nama Matakuliah =",nm_mk);
TEXTCOLOR (YELLOW);
Write("input nilai angka ="); readln(na);
Case na of
81..100 : nh:="A";
71..80  : nh:="B";
61..70  : nh:="C";
51..60  : nh:="D";
0..50   : nh:="E";
End;
Writeln("Nilai huruf  =",nh);
if nh="A" THEN KET :="MENDAPAT BEASISWA";
 Writeln("keterangan =",ket);
 WRITELN("");
 WRITELN("");
 WRITELN("Denni M Rajagukguk");READLN;
End.

NB: Harap diperhatikan baik baik codingnya, banyak jebakannya. Seamat mencoba  (')


Pert 5 : STRUKTUR KENDALI (NESTED IF/ IF BERSARANG) DAN CASE

Wednesday, 2 May 2018

CASE  digunakan untuk memilih diantara banyak pilihan.

Kelebihan dan kekurangan case

Kita tidak perlu membuat kondisi seperti halnya dengan statement IF.
Perbedaan case dengan IF adalah pernyataan if menyeleksi suatu kondisi yang terpenuhi, setelah memproses pernyataan dalam lingkungan yang terpenuhi tersebut.  Sedangkan case bila salah satu nilai terpenuhi dan pernyataan tersebut telah diproses maka yang lain tidak akan diseleksi.
Case terbagi atas 2:
CASE OF
CASE OF ELSE


Untuk materinya silahka download disini

 Atau kunjungi alamat ini.. https://www.duniailkom.com

Proteksi DMCA