Perhatikan potongan program di bawah ini!

procedure f(x: longint; y: longint; z: longint);
 begin
 if (y = 0) then
 writeln(z)
 else
 begin
 if (y mod 2 = 1) then
 z := z + x;
 f(2*x, y div 2, z)
 end;
 end;

Berapakah bilangan yang tercetak dilayar jika dilakukan pemanggilan f(15,97,0)?