Составить програмный код 2 - VB

  1. Вычислить среднее арифметическое четных чисел в массиве, заданном случайным образом в интервале [-9,2 ; 9,25].


textual

Код к задаче: «Составить програмный код 2 - VB»

n = 20
ReDim a(n)
Sa = 0: k = 0
For i = 1 To 20
a(i) = Rnd * (9.26 + 9.2) - 9.2
If a(i) Mod 2 = 0 Then Sa = Sa + a(i): k = k + 1
Next i
If k <> 0 Then MsgBox Sa / k

СДЕЛАЙТЕ РЕПОСТ

15   голосов, оценка 3.867 из 5



Похожие ответы
  1. Дано простое число. Составить функцию, которая будет находить следующее за ним простое число!

  1. Составить блок схему и реализовать на VB. Даны четыре целых числа А,В,С,D. Вывести на экран наибольшее из этих чисел или сообщение <<Нет>>,если среди указанных чисел нет наибольшего.

  1. Товарищи, помогите пожалуйста. Необходимо составить программу автоматического переноса слов. Исходная информация вводится с клавиатуры. Заранее благодарен, за любую помощь!

  1. Составить программу и вычислить:; Для организации цикла при вычислении Z1 использовать оператор цикла while..do.

  1. Добрые люди, помогите пожалуйста с задачей. Нужно реализовать с помощью цикла. Не понимаю

  1. -вывод последней цифры числа; -вывод исходного числа без последней цифры; -вычисление суммы двух последних цифр числа; -выводит исходное число, заменив последнюю цифру на ноль.

  1. Даны два массива вещественных чисел. Один массив упорядочен, другой – не упорядочен. Составить из двух массивов один упорядоченный массив методом вставок. Помогите пожалуйста с кодом( не могу придумать алгоритм

  1. Программа должна быть написана в двух вариантах: 1)использовать For ... To.. Step, Next 2) использовать IF... GO TO Составить программу расчёта величины программируемого урожая (ц/га) по формуле Y=(Q*KQ)/(1000*g) Где Q – величина фотосинтетически активной радиации (ФАР) за период вегетации, млн. ккал/га; kQ – коэффициент усвоения ФАР посевами, %; g – калорийность единицы урожая биомассы, ккал/га. Величина ФАР изменяется в пределах от 1800 до 2400 млн. ккал/га с шагом 100 млн. ккал. 1 вариант

  1. Составить проект для определения количества лет, необходимых для того, чтобы вложенный капитал при процентах годовых, которые указываются, увеличился в заданном отношении. (Необходимые формулы приведены в примере: На сколько лет нужно вложить капитал под 9% годовых, чтобы процентный платеж был равен его двойной сумме. Решение: 2×K = I. 2×K = K×9×g/100, g = 2×100/9 = 22.22)

  1. Добрый вечер, Нужно составить программу для определения суммы квадратов максимального и минимального элементов двухмерной матрицы размерностью 6х9. Численные значения элементов матрицы задать произвольно.