сколько секунд потребуется модему, передающему сообщение со скоростью 28800 бит/с, чтобы передать растровое изображение размером 800*600 пикселей, при

Нужно составить программу, которая так же выводит числа, только главное условие - чтоб выводимые числа делились и на 2, и на 3, и на 5
рабочая программа для вывода кратных 2,3 и 5:
Private Sub CommandButton1_Click()Dim i As IntegerDim n As Integern = InputBox("До какого числа выводить результат?")
Dim Massiv() As IntegerDim s As IntegerFor i = 0 To nIf (i Mod 2) = 0 Or (i Mod 3) = 0 Or (i Mod 5) = 0 ThenReDim Preserve Massiv(s)Massiv(s) = is = s + 1Range("A" & CStr(s)).SelectActiveCell.FormulaR1C1 = Massiv(s - 1)End IfNext
End Sub

второго вида - 7 кг, третьего вида - 4 кг. На производство единицы изделия В требуется затратить сырья первого вида - 3 кг, второго вида - 6 кг, третьего вида - 9 кг. Производство обеспечено сырьем первого вида в колличестве 864 кг, второго вида - 864 кг, третьего вида - 945 кг. Прибыль от реализации единицы готового изделия А составляет 2 тыс. руб, В - 3 тыс. руб. Составить план производства изделий А и В, обеспечивающий максимальную прибыль от их реализации.

тке полученных компонентов массива. Исходными данными являются одномерный массив, элементы которого задаются с помощью датчика случайных чисел от -50 до +50 и целое положительное число К

при условии, что цвет каждого пикселя кодируется 5 байтами?

условии, что каждый символ кодируется одним байтом.
Напишите подробное решение.

изображение размером 800х600 пикселей, при условии, что в каждом байте закодировано максимально возможное количесто пикселей