VBA 求出連續為0的最大值

2021-09-28 17:43:29 字數 1169 閱讀 6465

前言:這種題目在leetcode裡就是簡單難度,之前用python寫過乙個,這次有人有需求就用vba寫了乙個玩玩

)'自動算出一行連續為0的最大值

cal_row = inputbox(

"需要計算的開始行和結束行(如2,5):"

) my_rows = vba.split(cal_row,

",")

start_row = my_rows(0)

end_row = my_rows(1)

cal_column = inputbox(

"需要計算的開始列和結束列(如2,6):"

) my_column = vba.split(cal_column,

",")

start_column = my_column(0)

end_column = my_column(1)

answer_column = cint(inputbox(

"最終得出結果放到哪一列(如7):"))

for i = start_row to end_row

max_zero_count =

0 '最終需要匯出的連續0最大值

temp_zero_count =

0 '臨時的連續0計數

for j = start_column to end_column

if cells(i, j)

=0 then

temp_zero_count = temp_zero_count +

1 if temp_zero_count > max_zero_count then

max_zero_count = temp_zero_count

end if

else: temp_zero_count =

0 end if

next

cells(i, answer_column)

.value = max_zero_count

next

end sub

java 求出連續子陣列和為最大值的子陣列資訊

public static void main string args int max arr 0 連續n項相加值最大的子陣列和 int maxstartindex 0 連續n項相加值最大的子陣列起始索引 int maxendindex 0 連續n項相加值最大的子陣列終止索引 int sum arr...

求出陣列的最大值和次大值

求陣列的最大值相對來說是比較簡單,只需要遍歷一遍陣列,不斷更新陣列的最大值,直到遍歷完成。自然語言描述 1.初始化最大值的角標 2.遍歷陣列,比較當前的最大值角標的元素和遍歷得到陣列元素的大小 如果陣列元素大於當前最大值,更新最大值角標為遍歷到的陣列元素角標,直到遍歷完成程式語言描述 int get...

資料結構 遞迴求出最大值

遞迴排序 能用遞迴解決的問題都可以使用非遞迴來完成。時間複雜度 t n a t n b o n d 1 log b,a d 複雜度為o n log b,a 2 log b,a d 複雜度為o n d logn 3 log b,a d 複雜度為o n d 在本題中,將n樣本量分成兩部分,執行兩次因此a...