
Вопрос задан 20.07.2023 в 10:18.
Предмет Информатика.
Спрашивает Чернов Никита.
дано масив дійсних чисел із 20 елементів.Скласти програму, що обчислює суму елементів масиву модуль
яких більший за 1. 

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

Отвечает Иваницкая Екатерина.
var
arr: array[1..20] of real;
s:real;
i:integer;
Begin
s:= 0;
write('Массив: ');
for i:=1 to 20 do begin
arr[i]:= random(10);
write(arr[i], ' ');
end;
for i:=1 to 20 do
if Abs(arr[i]) > 1 then
S:= S + arr[i];
writeln;
writeln('Сумма: ', s);
END.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для обчислення суми елементів масиву, модуль яких більший за 1, вам потрібно створити програму, яка перевірить кожен елемент масиву на умову і додасть його до суми, якщо вона задовольняє умові. Ось приклад програми на мові Python:
pythondef sum_elements_greater_than_one(arr):
total_sum = 0
for element in arr:
if abs(element) > 1:
total_sum += element
return total_sum
# Приклад вхідного масиву (ви можете змінити його за потреби):
input_array = [1.5, -2.3, 0.8, 3.2, -1.1, 2.9, -1.7, -0.5, 1.2, -3.9, 0.4, 1.9, -2.5, 2.6, -4.2, -0.6, 3.7, -1.8, 1.1, -3.2]
result = sum_elements_greater_than_one(input_array)
print("Сума елементів масиву, модуль яких більший за 1:", result)
Програма перевірить кожен елемент масиву, взявши його модуль за допомогою abs()
, і якщо модуль більший за 1, то додасть елемент до total_sum
.


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

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

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

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

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

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

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

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