
Вопрос задан 30.07.2023 в 11:29.
Предмет Информатика.
Спрашивает Белецан Вадим.
сформировать массив из 10 произвольных чисел .определить сумму положительных четных элементов этого
массива.

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

Отвечает Ушаков Степан.
Var m : array[1..10] of Integer; i,s,p,n : Integer;Begin s:=0; p:=1; n:=0; For i:=1 to 10 do Begin m[i]:=-100+Random(201); Inc(n,Ord(m[i]=0)); If m[i]>0 then s:=s+m[i]; If m[i]<0 then p:=p*m[i]; end; Writeln(s,' ',p,' ',n);end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для создания массива из 10 произвольных чисел и определения суммы положительных четных элементов этого массива, вы можете использовать программный код на языке программирования, таком как Python. Вот пример такого кода:
pythonimport random
# Функция для создания массива из 10 произвольных чисел
def create_random_array(size):
return [random.randint(-100, 100) for _ in range(size)]
# Функция для определения суммы положительных четных элементов массива
def sum_positive_even_elements(arr):
return sum(x for x in arr if x > 0 and x % 2 == 0)
# Создаем массив из 10 произвольных чисел
random_array = create_random_array(10)
# Определяем сумму положительных четных элементов массива
result_sum = sum_positive_even_elements(random_array)
# Выводим результаты
print("Сгенерированный массив:", random_array)
print("Сумма положительных четных элементов:", result_sum)
Программа создаст массив из 10 случайных чисел в диапазоне от -100 до 100, затем вычислит сумму положительных четных элементов этого массива и выведет на экран оба результата. Обратите внимание, что при каждом запуске программы массив будет состоять из новых случайных чисел.


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

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

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

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

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

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

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

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