Дан массив b[1..20], заданный датчиком случайных чисел в интервале от -10 до 50. вывести индексы элементов массива, значения которых больше заданного числа х
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.
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.
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