Page 83 - Modul Daskom 2020
P. 83

Modul 3 – Array, Record dan Pemrograman Modular                                                                           2020

                                Tulis(total)
                               Selesai

                               Contoh Source code Fungsi :
                               Program  contohfunction;
                               Uses  crt;
                               Var
                                 jumlah,harga,total:integer;

                               Function  totalbiaya(jumlah,harga:integer):integer;
                               Begin
                               totalbiaya:=(jumlah*harga);
                               End;

                               Begin
                                 writeln('Selamat Datang di SALON OASI');
                                 writeln('Menghitung total biaya perawatan');
                                 write('Masukan jumlah perawatan  =');readln(jumlah);
                                 write('Masukan harga perawatan    =');readln(harga);
                                 total:=totalbiaya(jumlah,harga);
                                 writeln('Total biaya perawatan adalah ', total);
                                 readln;
                               End.

                  LATIHAN SOAL
                  1.  Apakah kelebihan dan kelemahan Array dan Record ? dan mengapa mereka di gabungkan menjadi
                     Gabungan Array dan Record ?
                  2.  Mengapa sebuah program diperlukan adanya subprogram? Jelaskan!
                  3.  Jelaskan  perbedaan  cara  mendeklarasikan  subprogram,  tanpa  nilai  parameter  dan  dengan  nilai
                     parameter!
                  4.  Buatlah contoh Flowchart  dari kehidupan sehari-hari menggunakan perintah tipe data bentukan pada
                     modul 3!
                  5.  Buatlah contoh program dari kehidupan sehari-hari yang terdapat pada soal nomor 4!


































                  Praktikum Dasar Komputer & Pemrograman 2020                                                                            III-81


       Copy protected with Online-PDF-No-Copy.com
   78   79   80   81   82   83   84   85   86   87   88