
Вопрос задан 24.07.2023 в 13:08.
Предмет Информатика.
Спрашивает Петухова Лизок.
Составьте программу, которая формирует массив из двадцати случайных целых чисел от -30 до 30 и
подсчитывает количество четных элементов. На экран выводятся исходные массив и результат

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

Отвечает Иргит Уран-Сай.
var a:array[1..20] of integer;
i,k: integer;
begin
write('Массив: ');
for i:=1 to 20 do
begin
a[i]:=random(61)-30;
if a[i] mod 2 = 0 then k:=k+1;
write (a[i]:3,' ')
end;
writeln;
write('Количество четных элементов ',k)
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для написания программы, которая формирует массив из двадцати случайных целых чисел от -30 до 30 и подсчитывает количество четных элементов, можно использовать язык программирования Python. Вот пример такой программы:
pythonimport random
def generate_random_array(size, min_val, max_val):
return [random.randint(min_val, max_val) for _ in range(size)]
def count_even_elements(array):
return sum(1 for num in array if num % 2 == 0)
if __name__ == "__main__":
array_size = 20
min_value = -30
max_value = 30
random_array = generate_random_array(array_size, min_value, max_value)
even_count = count_even_elements(random_array)
print("Исходный массив:", random_array)
print("Количество четных элементов:", even_count)
Этот код создаст массив из 20 случайных целых чисел в диапазоне от -30 до 30, затем посчитает количество четных элементов и выведет исходный массив и результат на экран.


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

Информатика 572

Информатика 1113

Информатика 10

Информатика 32

Информатика 16

Информатика 578

Информатика 21
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili