Developing.ru

Вот такая задача:
Необходимо отсортировать массив в порядке:
-возрастания, если среднее арифметическое элементов с четными значениями больше среднего арифметического элементов с нечетными значениями
-убывания, если среднее арифметическое элементов с четными значениями меньше среднего арифметического элементов с нечетными значениями

Чтение массива производится из текстового файла f1 и результат записывается тоже в текстовый файл(но f2), тоесть:

Var
a:array[1..15] of integer;
f1,f2:text;
i,n:integer;
Begin
Assign(f1,'1.txt');
Assign(f2,'2.txt');
reset(f1);
Read(f1,n);
For i:=1 to n do Read(f1,a);
close(f1);
...
(а тут код программы, который я пока не осилил...)
...
Rewrite(f2);
For i:=1 to n do Write(f2,a,' ');
Close(f2);
End.


Задача для меня сложная... Очень нуждаюсь в вашей помощи!!

http://forum.developing.ru/showthread.php?t=13351
(киньте в меня камень, если я не прав)

бюджет озвучте

Я даже не в курсе сколько за это берут. Могли бы вы назвать хотя бы приблизительно цену?

повстанец писал(а):Я даже не в курсе сколько за это берут. Могли бы вы назвать хотя бы приблизительно цену?

100р пойдет
airyashov(собака)inbox.ru

т.к. перешли к деньгам - уходит в "поиск заказов"

напиши свою асю! или почтовый ящик

&quot писал(а):напиши свою асю! или почтовый ящик

Пиши на 366300465 помогу намного дешевле=) Dim...On сорри=)

Medved писал(а): Dim...On сорри=)

да ничего я думаю повстанец сам разберётся к кому стучаться