Предмет: Информатика, автор: mboikova

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


Ответы

Автор ответа: Аноним
0
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


Приложения:
Предыдущий вопрос
Следующий вопрос
Интересные вопросы
Предмет: Окружающий мир, автор: danyiataubaldieva

задание во вложении​
6 лет назад
Предмет: Биология, автор: Аноним
1.Какое вещество используют для определения содержания крахмала.
2.Вещество-углевод, можно обнаружить в клубнях картофеля.
3.Общее название солей, содержащихся в клетке.
4.Органические вещества, необходимые в клетке для получения энергии.
5.Группа веществ, к которым относятся вода и минеральные соли.
6.Растительный белок, оставшийся после промывания теста.
7.Цвет воды с крахмалом после добавления раствора йода.
8.Часть картофеля, в которой при проведении лабораторной работы мы обнаружили крахмал.
помогите пж зарание спс
6 лет назад
Предмет: История, автор: Аноним
пожалуйста помогите мне ​
6 лет назад
Предмет: Математика, автор: antonelo2003
Сколько будет а*а*а*а
10 лет назад
Предмет: Экономика, автор: leno4ka1987

Себестоимость единицы товара, руб 3000

прибыль от продажи единицы товара 400

доля переменных затрат в полной себестоимости при существующем объеме перевозок 60%

объем производства тыс. штук 100

Фирма решает снизить цену на 100 рублей. при каком значении коэффициента эластичности предложения по цене возможно сохранение прибыли фирмы на прежнем уровне? 
10 лет назад