Программирование в vba. : массив сотоит из двадцати элементов. сколько элементов массива нужно сложить (начиная с первого), чтобы сумма превысила число 100. вот моя программа: private sub commandbutton1_click() dim c(1 to 20) as integer dim i, n, s as integer for i = 1 to 20 c(i) = cells(i, 1) next i s = 0 n = 0 for i = 1 to 20 if s < = 100 then s = s + c(i) and n = n + 1 next i cells(2, 3) = "количество элементов массива, сумма которых превышает 100=" & n end sub как результат выводит "0" (т.е. n заданное изначально). может, кто-то сможет подсказать ошибку? это !
S = S + C(I) : N = N + 1 - Исправленная