Bab 3 : : Contoh menggunakan looping atau pengulangan : :
1. Contohloop1.sql
Contoh program :
Declare
X number(3);
BEGIN
X:=&berapa;
FOR i IN 1..x LOOP
DBMS_OUTPUT.PUT_LINE('Ini angka ' || i );
END LOOP;
END;
/
Output :
Penjelasan :
Looping adalah pengulangan. Pada contoh soal yang pertama ini kita akan melakukan looping sebanyak 5 kali pada kalimat “ini angka ” dan disertai dengan pengulangan “i” tsb..
2. Contohloop2.sql
Contoh program :
Declare
x number(3);
BEGIN
X:=&berapa;
FOR i IN 1..x LOOP
if mod(i,2) = 1 then
DBMS_OUTPUT.PUT_LINE('Ini angka ' || i );
else
DBMS_OUTPUT.PUT_LINE('Ini angka ' || 'i ');
end if;
END LOOP;
END;
/
Output :
Penjelasan :
Untuk contoh soal ke 2 ini looping yang kita gunakan masih menggunakan FOR, tetapi tidak menutup kemungkinan untuk menggunakan looping yang lainnya. Untuk looping kali ini kita mengkombinasikan dengan fungsi IF. Kita akan melakukan looping sebanyak 5,dan jika angka yang sedang pada proses looping tsb bernilai ganjil maka akan mengeksekusi kalimat “ini angka (angka yang sedang di looping)”,tetapi jika angka yang sedang d proses itu bernilai genap maka yang akan di eksekusi adalah kalimat “ini angka i ”.
3. Contohloop3.sql
Contoh program :
Declare
X number(3);
BEGIN
X:=&berapa;
FOR i IN 1..x LOOP
if mod(i,2) = 1 then
for a in 1..i loop
DBMS_OUTPUT.PUT_LINE(a);
end loop;
else
DBMS_OUTPUT.PUT_LINE('lewat');
end if;
END LOOP;
END;
/
Output :
Penjelasan :
Untuk contoh ke 3 ini mungkin tingkat kesulitannya agal lebih tinggi di banding ke dua soal diatas. Kita melakukan 2 kali looping dan 1 kali if . pada tahap pertama kita melakukan looping untuk 4 kali. Looping pertama akan di periksa apakah benar angka dalam proses itu habis dibagi 2 dengan menggunakan if kondisi, setelah itu kita akan melakukan looping lagi angka dalam variable baru (a) menuju batas angka yang sedang dalam proses if kondisi (i). jika I tidak habis dibagi 2 maka program akan langsung mengeksekusi kata “lewat”. Dan tahap ini akan berulang sebanyak inputan user,dalam hal ini user menginputkan 4.
Langganan:
Posting Komentar (Atom)
0 komentar:
Posting Komentar