цикл for i:=1 to n do, интересует следующее Опции

[warning777]

возможно ли этот цикл запустить в обратном порядке,то есть
for i:=n to 1 do ?
интересуюсь,потому что не знаю как найти первый отрицательный элемент в массиве...
если использовать
for i:=1 to n do
begin
if a[i]<0 fhen
n1:=i
end.
он найдет первое и продолжит искать...как остановить поиск после нахождения первого отрицательного ?

[warning777]

если мне дан массив,записанный в файл, как мне выдрать из него массив,находящийся, допустим, между третим и десятым элементом в основном массиве
k=0
for i:=3 to 10 do
begin
k:=k+1;
b[k]:=a[i];
end
так будет работать ?