Дан массив B[1..20], заданный датчиком случайных чисел в интервале от -10 до 50. Вывести...

0 голосов
116 просмотров

Дан массив B[1..20], заданный датчиком случайных чисел в интервале от -10 до 50. Вывести индексы элементов массива, значения которых больше заданного числа Х


Информатика (17 баллов) | 116 просмотров
Дано ответов: 2
0 голосов

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.

(3.9k баллов)
0 голосов
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 
(1.8k баллов)