Вопрос задан 17.02.2021 в 23:15. Предмет Информатика. Спрашивает Черноблавская Мария.

Напишите программу, которая генерирует массив из случайных чисел от 20 до 85 в количестве не более

30 чисел. После этого необходимо посчитать количество чисел, больших введенного вами с клавиатуры. Hellp решает игоговую оценку
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Пархомчик Елизавета.
Program n1;
const n=15;
var a: array[1..n] of integer;
i,b,k: integer;
begin
randomize;
write('массив: ');
for i:=1 to n do begin
a[i]:=random(66)+20;
write(a[i],' ');
end;
writeln;
write('введите число: ');
readln(b);
k:=0;
for i:=1 to n do if a[i]>b then k:=k+1;
write('k=',k);
end.
0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно! Вот пример программы на языке Python, которая генерирует массив случайных чисел и подсчитывает количество чисел, больших заданного пользователем значения:

python
import random # Генерация массива случайных чисел array = [random.randint(20, 85) for _ in range(random.randint(1, 30))] # Вывод сгенерированного массива print("Сгенерированный массив:", array) # Ввод числа с клавиатуры user_input = int(input("Введите число: ")) # Подсчет количества чисел, больших заданного значения count = len([num for num in array if num > user_input]) # Вывод результата print("Количество чисел, больших", user_input, ":", count)

Программа сначала генерирует массив случайных чисел от 20 до 85 с помощью генератора списков. Затем выводит этот массив на экран. Пользователю предлагается ввести число с клавиатуры, после чего программа подсчитывает количество чисел в массиве, которые превышают заданное значение. Результат выводится на экран.

Надеюсь, это поможет! Если у вас возникнут еще вопросы, не стесняйтесь задавать.

0 0

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос