Дан массив с элементами 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.