Найти среднее арифметическое значение массива. - QBasic

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

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

Из массива вещественных чисел T(10) выписать в новую таблицу элементы,значения которых меньше 100. Найти их среднее арифметическое значение. Помогите пожалуйста

Решение задачи: «Найти среднее арифметическое значение массива.»

textual
Листинг программы
  1. CLS
  2. DIM t(10)
  3. FOR i = 1 TO 10
  4.     INPUT t(i)
  5. NEXT
  6. CLS
  7. PRINT "massiv:"
  8. FOR i = 1 TO 10
  9.     PRINT t(i);
  10. NEXT
  11. PRINT
  12. PRINT "novay tablica"
  13. FOR i = 1 TO 10
  14.     IF t(i) < 100 THEN PRINT t(i);: k = k + 1: s = s + t(i)
  15. NEXT
  16. PRINT
  17. PRINT "sred. znach"; s / k

Объяснение кода листинга программы

  1. Объявляется массив t(10) и инициализируется пустыми значениями.
  2. Задаётся цикл от 1 до 10, в котором пользователь вводит значения для каждого элемента массива t.
  3. Выполняется очистка экрана.
  4. Выводится сообщение massiv: и выводится каждый элемент массива t.
  5. Выполняется очистка экрана.
  6. Выводится сообщение novay tablica и выводятся элементы массива t, которые меньше 100.
  7. Выполняется очистка экрана.
  8. Выводится сообщение sred. znach и вычисляется среднее арифметическое значение массива t, которое равно сумме всех элементов, делённой на их количество.

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


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

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

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

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

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

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