Помогите пожалуйста!!!Составить блок-схему и написатьна VBAфункцию, вычисляющуюдля

Question

Помогите пожалуйста!!!Составить блок-схему и написатьна VBAфункцию, вычисляющуюдля

Помогите пожалуйста!!!
Составить блок-схему и написать
на VBA
функцию, вычисляющую
для одномерного массива количество частей,
чьи номера кратны 3 (а(3), a(6),
a(9))

Задать свой вопрос

Макс Бараковский 2019-03-13 23:53:04

Точно "количество частей, чьи номера кратны..."?

Vitalij Dorogajkin 2019-03-13 23:55:18

Количество элементов, чьи номера кратны 3 (а(3), a(6), a(9)) Скопировала из контрольной работы

Галина Зензина 2019-03-14 00:01:21

Ну тогда так, как написано

Варвара Горлекова 2019-03-14 00:10:56

Спасибо большое! Вы спасли мне жизнь!!!

Галапольский Арсений
Информатика
2019-03-13 23:47:09
0
1

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

составьте пожалуйста 10 предложений, на тему правильное кормленье залог здоровья

Помогите! Днём этот грызун отсыпается в дупле,а на зиму в подает

Почему в предложении Плутовка к дереву на цыпочках подходит,Ворочает хвостом,с Вороны

записать самое большое и самое малюсенькое из шестизначных чисел.выполнить их разностное

Доброе время суток!Вот таковой вопрос:Существует слово разрЯдить и разрЕдить.Разрядить можно

запишите начальные формы глаголов обусловь их спрежение таешь видишь слышишь веешь

Цена нескольких схожих тетрадей 120 тенге.Какова стоимость таких же тетрадей,если

(586+100)-686+1000100=

5(x+23)-45=255 как решить

Как разделить на слоги и для переноса слова : лентяй,крючку ?

Ленка Тыпикина · Answer 1 · 2019-03-13 23:51:41+3:00

Function Strange(a() As Integer) As Integer
    Dim n As Integer, i As Integer
    n = 0
    For i = LBound(a) To UBound(a)
        If i Mod 3 = 0 Then n = n + 1
    Next i
    Strange = n
End Function

О проекте

Помогите пожалуйста!!!Составить блок-схему и написатьна VBAфункцию, вычисляющуюдля

Добро пожаловать!