Дан массив с элементами 2 5 9 15 0 4. С цикла for и оператора if выведите на экран столбец тех элементов массива которые больше 3 но меньше 10.

var arr:array[1..6] of integer;

    i:integer;

begin

arr[1]:=2; arr[2]:=5; arr[3]:=9; arr[4]:=15; arr[5]:=0; arr[6]:=4;  

for i:=1 to 6 do

  if (arr[i] > 3) and (arr[i] < 10) then  writeln(arr[i]);

readln;

end.

Объяснение: