Составить програмный код 2 - VB
Формулировка задачи:
Вычислить среднее арифметическое четных чисел в массиве, заданном случайным образом в интервале [-9,2 ; 9,25].
Решение задачи: «Составить програмный код 2»
textual
Листинг программы
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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д