сначала найди все положительные элементы массива a[i], запиши их в массив b[i], затем от туда отфильтруй эти значения условием с<=a[i]<=d
ну чёто типа этого:
Код:
For i:=0 to 19 do
begin
if a[i]>=o then b[i]:=a[i]
end;
For i:=0 to 19 do
begin
if (b[i]<=d) and (c<=b[i]) then a[i]:=b[i];
end;
примерно так...потом из a[i] значения присвой например текстовому полю циклом или можеш миную присвоение a[i] сразу подставить вместо него Текстовое поле или куда там ты выводиш. Незабудь сначала создать массив b[i]