Page 96 - Pemrograman Dasar kelas X
P. 96

92          Pemrograman Dasar SMK Kelas X Sem 2

                            Program...................................................................
                            Var ..........................................................................

                                 ........................................................................
                                 .......................................................................
                            Begin

                                Writeln( ................................................................................... );
                                Write( .................................................................................. );

                                readln( .................................... );
                                write( .................................................................................... );
                                readln( ..................................... );

                                write( .................................................................................... );
                                readln( ..................................... );

                                biaya_sewa:= ...........................* .................................. ;
                                denda:=0;
                                if (lama_kembali>3) then

                                   denda:=................*. .................. *1000;
                                total_bayar:=............................+ ............................. ;
                                writeln( .................................................................. );

                                writeln( .................................................................. );
                                writeln( .................................................................. );
                                readln;

                            End.



                 3.  Permasalahan berikut diambil dari buku semester 1 Bab 2, pada LKS Kegiatan belajar 1.
                     Subsidi biaya pendidikan diberikan oleh pemerintah kepada semua penduduk dengan
                     besaran 50 ribu tiap anak tiap bulannya, yang hanya diberikan kepada semua keluarga

                     yang memiliki anak usia sekolah (6-17 tahun). Bagi keluarga yang kurang mampu, subsidi
                     dinaikkan menjadi 60 ribu per bulan ditambah dengan bantuan sosial sebesar 100 ribu per
                     bulan. Ukuran keluarga tidak mampu dilihat dari penghasilan dan besarnya konsumsi listrik

                     tiap bulan. Keluarga dikatakan kurang mampu jika penghasilannya kurang dari 1 juta per
                     bulan dan konsumsi listrik kurang dari 100 ribu per bulan.
                     Buatlah program dengan Bahasa Pascal dengan struktur percabangan dengan 1 kondisi,

                     dengan format input dan output sebagai berikut.
                     Input:

                     Nama Kepala Keluarga                       : ........................................................
                     Jumlah anak usia sekolah (6-17 tahun)      : .......................................................
                     Penghasilan per bulan                      : .......................................................

                     Konsumsi listrik tiap bulan                : .......................................................
   91   92   93   94   95   96   97   98   99   100   101