var b:array [1..20] of integer;
x,i:integer;
begin
for i:=1 to 20 do b[i]:=random (61)-10;
writeln(b);
readln(x);
for i:=1 to 20 do
if b[i]>x then write(i,'  ')
end.

import random
b = [random.randint(-10,50) for i in range (1,20)]
x = int(input("x = "))
print(b)
for q in b:
----if q > x:
--------print(q,end=' ')

Пример:
x = 5[-7, 47, 19, 6, 0, -6, 48, -4, 33, -1, 5, 14, 28, 19, 25, 40, -1, 23, 4]47 19 6 48 33 14 28 19 25 40 23