Массивы

[Katenok101290]

Я НИЧЕГО не понимаю в информатике!
Вот задача:Найти среднее значение элементов заданного массива М размером 5. Преобразовать исходный массив, вычитая из каждого элемента среднее значение.
Вод какой-то код:
uses crt;
const n=5;
var a:array[1..n]of real;
sr:real;
i:integer;
begin
clrscr;
writeln('Ishodny massiv:');
sr:=0;
for i:=1 to n do
begin
a[i]:=random(10)+random;
write(a[i]:6:2);
sr:=sr+a[i];
end;
sr:=sr/n;
writeln;
writeln('sr=',sr:5:2);
writeln('Rezultat:');
for i:=1 to n do
begin
a[i]:=a[i]-sr;
write(a[i]:6:2);
end;
readln
end.
А куда его вставлять и что с ним делать не понимаю!!!! Объясните, ПОЖАЛУЙСТА!!!!

[Волк]

Объясните что вы имеете ввиду под вставлять??

[Волк]

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

Вот задача:Найти среднее значение элементов заданного массива М размером 5. Преобразовать исходный массив, вычитая из каждого элемента среднее значение.

Что вы имеете ввиду под вставлять следуя условию задания вы все сделали т.е. задача выполнена.