Сформировать из чисел массив и найти среднее арифметическое значение всех его составляющих - Turbo Pascal

  1. в главной программе вводятся 5 чисел , функция формирует из них массив и находит ср. арифметическое значение всех его составляющих ! помогите плз


textual

Код к задаче: «Сформировать из чисел массив и найти среднее арифметическое значение всех его составляющих - Turbo Pascal»

Var
  m : Array[1..5] of Integer;
  i : Byte;
Function SrAr : Real;
Begin
  SrAr:=(m[1]+m[2]+m[3]+m[4]+m[5])/5;
End;
Begin
  For i:=1 to 5 do Readln(m[i]);
  Writeln('Среднее арифметическое: ',SrAr:8:4);
End.

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

10   голосов, оценка 4.000 из 5



Похожие ответы
  1. Задание собственно такое: Составить программу формирования из вектора A={ai}, i=1/3n вектора B={bi}, i=1/n, очередная компонента которого равна среднему арифметическому очередной тройки компонент вектора. вот сама программа:

  1. Заданы три числа, надо найти минимальное число. Составить программу для вычисления периметра 10 прямоугольников.

  1. Два нечетных простых числа, разность между которыми равна 2, называются близнецами. На интервале от 1 до 1000 найти всех близнецов и подсчитать количество пар. Необходимо сделать ,используя только циклы ,а без функций и процедур я хз как(

  1. Ввести с клавиатуры двумерный массив из 9 чисел, подсчитать сумму элементов всего массива

  1. 1.Составить программу вычисления суммы квадратов чётных чисел из промежутка [a,b].

  1. Произвольно заданы три одномерных массива. Сформировать новый массив, состоящий из десяти элементов с наибольшими значениями исходных массивов. Помогите пожалуйста! Нужно написать программу с while и repeat!!!(отдельные)

  1. Задание: Даны три числа a, b, c. Составить программу нахождения значения минимального отклонения каждого из них от их среднего арифметического. Данные выбрать произвольно.

  1. нужна написать программу чтоб вышел такой рисунок *** ** *

  1. помогите пожалуйста написать программу,которая найдет все натуральные числа,меньше чем MAXINT, такие ,что они равны сумме факториалов цифр,из которых состоят. пример: 145=1!+4!+5!

  1. Написать программу на зыке Pascal для обработки матриц. Размерности матрицы и ее элементы должны вводиться с клавиатуры. Полученная матрица и другие элементы должны выводиться на экран. Определить произведение элементов в тех столбцах, которые не содержат элементов кратных 5.