Page 178 - Pemrograman Dasar kelas X
P. 178

174         Pemrograman Dasar SMK Kelas X Sem 2

                       cthreads,
                       {$ENDIF}{$ENDIF}
                       Classes, sysutils;
                   Var bulan: Integer;
                   begin
                      Write('Masukkan bulan ke berapa: ');
                      Readln(bulan);
                      try
                         if (bulan< 1) or (xbulan> 12) then // raise exception
                               raise exception.Create('Nilai Bulan di luar jangkauan');
                         Writeln('Anda memasukkan bulan ke  ‘,bulan);
                      except
                         on e: exception do // Catch my exception
                             begin
                                   Writeln('Kesalahannya adalah: ' + e.Message);
                             end;
                      end;
                      Write('Tekan Enter untuk menutup');
                      Readln;
                   end.


                 Hasil outputnya untuk kesalahan seperti nilai bulan=13 adalah sebagai berikut.










             Agar pemahaman kalian lebih jelas mengenai penganganan error ini, kerjakan LKS berikut.


             LEMBAR KERJA SISWA
             1.  Buatlah  sebuah  program  untuk  menentukan  tinggi  balok  berdasarkan  Volume,  panjang  dan
                 lebar  balok.  Gunakan  pernyataan  Try  ...Except  untuk  menghindari  kesalahan  dalam

                 perhitungan.
                 Jawab:

                 ........................................................................................................................................................
                 ........................................................................................................................................................
                 ........................................................................................................................................................

                 ........................................................................................................................................................
                 ........................................................................................................................................................

                 ........................................................................................................................................................
                 ........................................................................................................................................................
                 ........................................................................................................................................................

                 ........................................................................................................................................................
                 ........................................................................................................................................................
                 ........................................................................................................................................................
   173   174   175   176   177   178   179   180   181   182   183