Bantu temanmu belajar dengan menambahkan soal di Kujawab. Klik disini..

Olimpiade Sains Kota (OSK) 2018 - Komputer , Nomor 31

31
var data: array[1..10] of integer = (8, 12, 16, 20, 12, 14, 16, 20, 20, 22);
function itik(a, b: integer):integer;
begin
     if b = 0 then itik := a
        else itik := itik(b,a mod b);
end;
function bebek(x: integer):integer;
begin
     if x > 10 then bebek:=0
        else bebek := itik(data[x], bebek(x * 2));
end;
begin
 writeln(bebek(1));
end.

Apakah keluaran dari program di atas? a. 1 b. 2 c. 3 d. 4 e. 5