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

Olimpiade Sains Provinsi (OSP) 2014 - Komputer , Nomor 46 - 47

Deskripsi untuk soal nomor 46 - 47

Perhatikan potongan kode program berikut

var i,j: integer;
var board: array[0..5] of longint;
function kepo():integer;
var n:integer = 0;
begin
 for i := 5 downto 0 do begin
 n := n shl 1;
 n := n + (board[i] mod 2);
 end;
 kepo:=n;
end;
procedure tambah();
begin
 for i := 0 to 17 do
 for j := 0 to 5 do
 board[j] := board[j] + sqr(j+i);
end;
begin
 for i := 0 to 5 do
 board[i] := i;
 tambah();
 writeln(kepo());
end.
46

Berapakah output yang dihasilkan bila program tersebut dijalankan?

47

Berapakah nilai board[1] pada akhir program?