Algorithm code(A,n,left,right) if (left = right) then return 1 else a <- code(A, n, left, [ (𝑙𝑒𝑓𝑡+𝑟𝑖𝑔ℎ𝑡)/2]) b <- code(A, n, [((𝑙𝑒𝑓𝑡 + 𝑟𝑖𝑔ℎ𝑡)/2)+1], right) result <- a + b for i <- left to right do result <- result * A[i] return result