Составить процедуру вычисления среднего арифметического элементов одномерного массива A[m]

@Nick62rus · Регистрация: 18.12.2013

Студворк — интернет-сервис помощи студентам

Составить процедуру вычисления среднего арифметического элементов одномерного массива A[m], с помощью процедуры вычислить среднее арифметическое строк матрицы B[m,m].!! Помогите срочно!!!

@RAFISTAUR · 25.12.2013, 19:51

для одномерного массива только это программа:

Pascal

uses crt;
const m=30;
var a:array[1..m] of integer;i,x,z:integer;q:real;
begin clrscr;randomize;
repeat
a[x]:=random(1000);inc(x);
until x=m+1;x:=1;
for i:=1 to m do begin
z:=z+a[x];writeln('element nomer ',x,'= ',a[x]);
inc(x);end;q:=z/m;
write('sred arif= ',q);readln;end.

@Nick62rus · 25.12.2013, 20:15 **[ТС]**

Сообщение от RAFISTAUR

для одномерного массива только это программа:

это процедура ?

@Nick62rus 0 / 0 / 0 Регистрация: 18.12.2013 Сообщений: 9
		1
	Составить процедуру вычисления среднего арифметического элементов одномерного массива A[m] 25.12.2013, 19:30. Показов 1739. Ответов 2 Метки нет (Все метки) Составить процедуру вычисления среднего арифметического элементов одномерного массива A[m], с помощью процедуры вычислить среднее арифметическое строк матрицы B[m,m].!! Помогите срочно!!! 0

@Nick62rus 0 / 0 / 0 Регистрация: 18.12.2013 Сообщений: 9
	25.12.2013, 20:15 [ТС]	3
	Сообщение от RAFISTAUR для одномерного массива только это программа: это процедура ? 0

Опции темы

Составить процедуру вычисления среднего арифметического элементов одномерного массива A[m]

Решение