Одномерные массивы

[aiktz]

плииииииииииииииизззз......как написать задачку?

1. Написать программу размещения элементов заданного вектора в обратном порядке (без использования дополнительного массива).

2.Найти отношение суммы положительных элементов заданного вектора к модулю суммы отрицатель-ных элементов и отношение их количества. Если отрицательных элементов нет, выдать сообщение.

[maladoy]

2

for i:=1 to n do begin
if a[i]> 0 then begin 
inc(pol);
spol:=spol+a[i];end;
if a[i]<0 then begin
inc(otr);
sotr:=sotr+a[i];end;
end;
if otr= 0 then writeln('otr net')
else begin
 spol:=spol/abs(sotr);
 pol:=pol/otr;
writeln('otn summ',spol:6:4);
writeln('otn kolva:',pol:6:4);
end;

[Stilet]

заданного вектора

Пример вектора приведи? он орто или по диагонали может быть?

[aiktz]

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