В массиве А(15) у первых десяти элементов поменять знак на обратный, найти сумму последних пяти элементов. Задача на языке vba . Помогите написать программу плизззз.
Помещаем в код листа рабочей книги макрос Sub aaa() a = Range("A1:A15") For i = 1 To 10 a(i, 1) = -a(i, 1) Next i s = 0 For i = 11 To 15 s = s + a(i, 1) Next i MsgBox s End Sub Размещаем элементы массива в диапазоне от А1 до А15 и запускаем макрос.
Программа не работает можете на скрине показать?
Я даже не представляю, что Вы такое сделали, что она у Вас не работает. Не могу показать, потому что некуда его прицепить, а ссылки давать запрещено
Лучше напишите, как это "не работает"? Что Вы делали и что получилось?
А нет все заработало) можете блок схему и текст к ней скинуть?)
Аппетит приходит с едой? О блок-схемах речи в вопросе не было, иначе я бы не взяся за него, потому что чертить блок-схемы - это рабский труд.