Дан целочисленный одномерный массив, заполненный с клавиатуры. сформируйте новый массив из значений исходного массива, больших 20 и имеющих индексы, кратные 10.

Arr - тот самый одномерный массив длины n (начиная с 0)

Python:
newArr = []
for i in range(0, n, 10):
   if arr[i] > 20:
        newArr.append(arr[i])

Паскаль:

заведём d - динамический массив
и var  i : integer;

...

for i:=0 to (n - 1) do
if (i mod 10)  = 0 then
if arr[i] > 20 then begin
setLength(d, length(d) + 1);
d[length(d) - 1] := arr[i];
end;
...