PASCAL - Contoh Percabangan bersarang

-
Soal :
Pada sebuah tempat penyewaan kaset DVD, terdapat peraturan sebagai berikut :
○ Jika status penyewa adalah ANGGOTA, maka berapapun jumlah kaset yang disewa , harganya Rp.3.500/DVD.
○ Jika status penyewa adalah BUKAN ANGGOTA, maka ,
         ● Jika jumlah kaset >=5, maka harga sewa                      Rp.4.000/DVD
         ● Jika jumlah kaset<5, maka harga sewa                          Rp.5.000/DVD.




Komentar

Posting Komentar

Postingan populer dari blog ini

FUNCTION DENGAN PARAMETER - TUGAS II

-
Gambar
TUGAS II - FUNCTION DENGAN PARAMETER Perhatikan program di bawah ini ! Contoh tersbut adalah program untuk menentukan bilangan genap dan ganjil. Berikut penjelasannya : 1. Function genap(x : integer) : boolean;     Kode di atas untuk mendeklarasikan fungsi dengan nama genap. Pada fungsi tersebut disertakan      parameter x bernilai integer untuk menghasilkan output yang bernilai boolean. Dalam hal ini yang      bernilai boolean adalah genap. 2. genap := false     Baris kode ini terletak pada badan function, berfungsi untuk mensetting nilai awal genap = false. 3. if x mod 2 = 0 then     Baris kode ini merupakan baris penyeleksian terhadap nilai parameter yang dikirimkan ketika         menggunakan function pada parameter x. Sebuah bilangan dikatakan bernilai genap jika bilangan tersebut habis dibagi 2. 4. genap := true     Baris kode ini memiliki arti jika x bernilai 0, output function genap nya bernilai true. 5. for i := 1 to 10 do     Merupakan pengulangan sebany
Baca selengkapnya

Function dengan parameter - PASCAL

-
Gambar
Berikut ini adalah contoh soal  menggunakan function dengan parameter di dalamnya. Bagaimana caranya mencetak luas persegi panjang  menggunakan function dengan parameter. Perhatikan program berikut :  perhatikan tulisan function luas(p,l:integer):integer; di atas. Luas :adalah nama function nya, tipe datanya adalah integer. (p,l:integer) : adalah parameter - parameter yg dimiliki oleh luas yg bertipe data integer Lalu untuk memunculkan hasil, agar menuliskan , sbb: Writeln('luas :', luas(p,l)); luas(p,l) ,,,, perlu diingat ya, supaya hasil perhitungannya muncul, nama function dan parameter2 nya harus disertakan seperti contoh tersebut.  Berikut outputnya : SOAL Pada contoh output di atas,, kamu dapat melihat bahwa yang muncul adalah : nilai panjang, nilai lebar , dan nilai luas. Dapatkah kamu menambahkan sebuah function dengan nama function keliling KE dalam program di atas sehingga menghasilkan output sbb :
Baca selengkapnya

FUNCTION - PASCAL

-
Gambar
Function merupakan submodul dalam program utama yang berfungsi secara khusus untuk mengembalikan nilai dengan tipe data tertentu dari parameter yang diberikan. Nilai yang yang dikembalikan disebut dengan return value. Perbedaan utama antara procedure dan function adalah cara menghasilkan output dari input yang diberikan pada submodul tersebut. Walaupun procedure bisa menghasilkan nilai output, nilai tersebut tidak dapat diambil secara langsung, tetapi harus diambil melalui parameter referensi.  Ada 2 macam function, yaitu function parameter dan function dengan parameter. 1.  Function nonparameter Syntax : Function nama_function : tipe_data; Begin         Statement; End; Contoh penggunaan function non parameter Hasilnya : 2. Function dengan parameter : syntax : Function nama_function(variabel :tipe_data) : tipe_data; Begin Statement ; End; Contoh program function dengan parameter : Hasi
Baca selengkapnya