Olimpiade Sains Kota (OSK) 2019 - Komputer, Nomor 32–34
Deskripsi Untuk Soal Nomor 32 dan 34
var arr : array [0..5] of integer = (8,1,6,3,4,15); i : integer; aduk : array [0..6] of integer; procedure kalikali(); begin aduk[0] := 1; for i:=1 to 6 do aduk[i] := aduk[i-1] * arr[i-1]; end; function hasil (kiri, kanan :integer): integer; begin hasil := (aduk[kanan] div aduk[kiri-1]); end; begin kalikali(); writeln(aduk[3]); writeln(hasil(2,3)); writeln(hasil(4,6)); end.
32.
Apakah keluaran baris writeln(aduk[3]); dari program di atas?
a. 3
b. 6
c. 48
d. 144
e. 180
33.
Apakah keluaran baris writeln(hasil(2,3)); dari program di atas?
a. 3
b. 6
c. 48
d. 144
e. 180
34.
Apakah keluaran baris writeln(hasil(4,6)); dari program di atas?
a. 3
b. 6
c. 48
d. 144
e. 180
2 jawaban
ABDAN HAFIDZ4 tahun lalu
0
32. aduk[0] = 1
aduk[1] = aduk[0]*arr[0] = 1*8 = 8
aduk[2] = aduk[1]*arr[1] = 8*1 = 8
aduk[3] = aduk[2]*arr[2] = 8*6 = 48
JAWABAN C
Andrio Prijaya3 tahun lalu
0
32. hasil(2,3)
function hasil (kiri, kanan :integer): integer;
Kiri = 2, Kanan = 3
hasil := (aduk[kanan] div aduk[kiri-1]);
hasil = aduk(3) div aduk(2-1)
hasil = 48 div aduk(1)
hasil = 48 div 8 = 6
33. hasil(4,6)
function hasil (kiri, kanan :integer): integer;
Kiri = 4, Kanan = 6
hasil := (aduk[kanan] div aduk[kiri-1]);
hasil = aduk(6) div aduk(4-1)
hasil = 8640 div aduk(3)
hasil = 8640 div 48 = 180
Masuk untuk menulis jawaban