Вычислить и вывести на экран среднее геометрическое десяти введённых числовых значений - VB
Формулировка задачи:
Написать программу, которая генерирует N случайных чисел в диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее геометрическое.
3 часа никак не мог написать программу... помогите =)
Решение задачи: «Вычислить и вывести на экран среднее геометрическое десяти введённых числовых значений»
textual
Листинг программы
Private Sub Command1_Click() n = Text1.Text Text2.Text = "" For i = 1 To n Next i x = n * (n - 1) Text2.Text = x End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д