Рееебят помоги пожаалуйста! Я вообще не понимаю это ((( а мне нужно сдать ее ((

обычно такие задачи школьные уровня 9ого класса пишутся на паскале за 3 минуты.

var
A: array[1..n] of real;
B: array[1..n] of real;
С: array[1..n] of real;
i, n:integer; S,L,max:real;

begin
writeln('Введите число элементов массива');
readln(n);
writeln('Введите элементы массива');
for i:=1 to n do readln(A{i}) ;
S:=0;
for i:=1 to n do S:=S+A{i};
L:=S/n;
writeln('Среднее арифметическое равно', L);
witeln('Преобразованный массив');
for i:=1 to n do
begin
далее вопрос сами значения элементов должны быть четными или нечетными ли их порядковый номер?
если сами элементы, то так:
if (A{i} mod 2) =0
then B{i}:=A{i}/L;
write(' ',B{i},' ');
end;
если индекс, то так:
if (i mod 2)=0
then B{i}:=A{i}/L;
write(' ',B{i},' ');
end;
дальше вопрос: находить максимальный элемент массива надо в преобразованном массиве, или в исходном?
поэтому дальше 2 продолжения кода программы:
1) если искать в исходном массиве
max:=A{1};
for i:=1 to n do
if A{i}>max
then max:=A{i};
если элементы считаются нечетными, то
for i:=1 to n do
if (A{i} mod 2) <>0
then C{i}:=A{i}/max;
если порядковые номера элемнтов считаются нечетными, то:
for i :=1 to n do
if (i mod 2)<>0
then C{i}:=A{i}/max;
2)если требуется искать максимум в преобразованном массиве:
max:=B{1};
for i:=1 to n do
if B{i}>max
then max:=B{i};
если элементы считаются нечетными, то:
for i:=1 to n do
if (B{i} mod 2)<>0
then C{i}:=B{i}/max;
если индекс элементов считается нечетными, то:
for i:=1 to n do
if (i mod 2)<>0
then C{i}:=B{i}/max;
Внимательно прочитай вышенаписанное, в зависимости от того что тебе точно нужно по условию задачи выбери необходимый итоговый код.
далее
writeln('Ещё один преобразованный массив');
for i:=1 to n
do write(' ',C{i},' ');
end.
P.S. там, где в тексте программы фигурные скобки, должны быть КВАДРАТНЫЕ скобки, просто мэйл. ру не дает писать квадратные.

насколько я поняла, то речь идёт о программировании. на каком языке?