Массивы в Delphi

[Sianessa]

Нужно решить задачу на Delphi с формой... Точнее, я не могу уловить даже саму суть...

Даны действительные числа a1, a2, ...,a2n. Получить a1, an+1, a2, an+2, ..., an, a2n. Вычислить отдельно, сумму отрицательных и положительных чисел.

[Олег678]

В цикле for проходитесь по всем от первого до N элемента, я так понял прибавляете к элементам с четным индексом текушее значение счетчика цикла, потом еще раз проходитесь и складываете положительные и отрицательные элементы в отдельные переменные. Вроде правильно объяснил ... )

[Sianessa]

Ну неужели совсем никто мне помочь не может? (

[Gorychev]

Вам уже помогли, объяснили суть, как вы изволили выразиться. Вы же уже давно на форуме, о существование раздела Фриланс вам известно...

[IT-man]

Стучи в асю сделаю!недорого!

[ОДИНОЧЕСТВО В СЕТИ]

{дописать ввод из стринггрида}
i:=3;
 n:=n2 div 2;
 while i<=n2-1 do begin
   tm:=a[n];
   for j:=n downto i-1  do
   a[j]:=a[j-1];
  a[i-1]:=tm;
  inc(n);
  Inc(i,2);
 end;
{дописать вывод в стринггрид}

[Sianessa]

Gorychev, наверное будете смеяться, но что такое "раздел Фриланс" ?

ОДИНОЧЕСТВО В СЕТИ, хорошо, спасибо, я сейчас попробую...

[ОДИНОЧЕСТВО В СЕТИ]

что такое "раздел Фриланс" ?

Это тот раздел - где нерадивым студентам "опытные" программисты за скромную оплату пишут программы!
Находится тут!

хорошо, спасибо, я сейчас попробую...

Пробуйте!

[Stilet]

но что такое "раздел Фриланс" ?

Это раздел, где делают программы за деньги.