Olimpiade Sains Kota (OSK) 2014 - Komputer, Nomor 50

Perhatikan potongan program berikut, dan str(v:integer) mengembalikan v dalam type string

var hasil:string; bil,a:integer;
procedure terjemahan (x:integer, var y:integer)
begin
 if (x<=y) then
 begin
terjemahan(x*3,y);
hasil:=str(y div x)+hasil;
y:=y mod x;
 end;
end;
begin
 hasil:=’’; {strinng kosong}
 terjemahan(a,bil);
 writeln(hasil);
end.

Apabila nilai a adalah 1 dan nilai bil adalah 80, apakah output program di atas apabila prosedur terjemahan dijalankan?

A. 1111

B. 2222

C. 1212

D. 1221

E. 2121