Дан вектор X (n), вычислить среднюю величину отрицательных элементов - VB

Узнай цену своей работы

Формулировка задачи:

Доброго времени. Помогите, пожалуйста, с задачей. Дан вектор X(n), вычислить среднюю величину отрицательных элементов. Есть одно решение, но оно на QBasic...

Решение задачи: «Дан вектор X (n), вычислить среднюю величину отрицательных элементов»

textual
Листинг программы
  1.  static void Main(string[] args)
  2.         {
  3.             uint n;
  4.             GetData(out n);
  5.             CreateMassiv(n);
  6.         }
  7.  
  8.         private static void GetData(out uint n)
  9.         {
  10.  
  11.             do { Console.WriteLine("Vvedite kolichestvo chlenov vektora:"); }
  12.             while (!uint.TryParse(Console.ReadLine(), out n));
  13.         }
  14.  
  15.         private static void CreateMassiv(uint n)
  16.         {
  17.             int number = 0, chislo = 0, m;
  18.             Random s = new Random();
  19.             int[] arr = new int[n];
  20.             for (int i = 0; i < n; ++i)
  21.             {
  22.                 arr[i] = s.Next(-100, 101);
  23.                 Console.Write(arr[i] + "\t");
  24.             }
  25.             for (int i = 0; i < arr.GetLength(0); ++i)
  26.             {
  27.                 if (arr[i] < 0)
  28.                 {
  29.                     ++number;
  30.                     chislo += arr[i];
  31.                     m = chislo / number;
  32.                     Console.Write("\nChsilo otricatelnuh chlenov:" + number);
  33.                     Console.Write("\nSumma vseh otricatelnuh chlenov:" + chislo);
  34.                     Console.Write("\nSrednya velechina :" + m);
  35.  
  36.                 }
  37.                 else
  38.                     Console.WriteLine("Otricatelnyh chlenov net");
  39.             }
  40.         }

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 4.214 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы