Page 176 - Pemrograman Dasar kelas X

172 Pemrograman Dasar SMK Kelas X Sem 2

Coba kita jalankan dengan dengan masukan =4 dan b=0

Ketika error terjadi, yaitu adanya pembagian dengan nol maka akan muncul pesan “Telah
terjadi error” diikuti dengan tipe kesalahan yang terjadi. Kejadian exception (pengecualian)
dideteksi pada pernyataan Hasil:=a/b. Jika nilai b = 0 maka perintah di bawah pengecualian

akan dilakukan jika tidka maka langkah-langkah dalam pengecualian tidak dilakukan.

2. Pernyataan Try... Finally
Pernyataan Try .. Finally ini menjalankans erangkain proses setelah perintah Try. Jika ada error
ma pada bagian error itu akan dilewati. Kemudian perintah-perintah setelah pernyataan Finally

akan dieksekusi apapun yang terjadi baik ada kesalahan atau tidak.
Sintak pernyataan Try ...Finally

try
Pernyataan1;
Pernyataan2;

Finally
Pernyataan3;
end;

Contoh 2.
program ExceptionHandling;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}

cthreads,
{$ENDIF}{$ENDIF}
Classes, sysutils;
var
a, b: Integer;
Hasil: Real;
begin
try
Write('masukkan nilai a: ');
Readln(a);
Write('Masukkan nilai b: ');
Readln(b);