
Вопрос задан 05.07.2023 в 19:11.
Предмет Информатика.
Спрашивает Козлова Милана.
СРОЧНО! 1)Задать массив,состоящий из 16 вещественных чисел. Найти максимальный элемент массива.
2)Увеличить на 4 каждый положительный элемент массива. 3)Найти количество всех элементов массива,которые меньше 3

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

Отвечает Зайчикова Кристина.
Ответ:
--- PascalABC.NET 3.6.2 ---
begin
var A := ArrRandomReal(16, -99, 99);
A.Println;
Println($'Max Element: {A.Max}'); //Макс элемент
A.Transform(p -> p>0? p + 4 : p); // Увеличиваем на 4 все положительные
A.Println;
A.Count(p -> p < 3).Println; // Считаем числа меньше 3
end.
Объяснение:
На основе личных наблюдений, если автор вопроса не указывает ЯП, то ему в 90% случаев нужно на паскале. По этому решение приведено именно на нём



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Конечно, вот как можно выполнить эти задачи на языке программирования Python:
python# Задаем массив из 16 вещественных чисел
array = [2.5, -1.7, 4.8, 0.3, -3.2, 5.6, 1.2, -2.0, 3.1, -0.5, 2.0, 6.7, -4.2, 3.9, -1.0, 0.8]
# Найти максимальный элемент массива
max_element = max(array)
print("Максимальный элемент массива:", max_element)
# Увеличить на 4 каждый положительный элемент массива
for i in range(len(array)):
if array[i] > 0:
array[i] += 4
print("Массив после увеличения положительных элементов:", array)
# Найти количество всех элементов массива, которые меньше 3
count_less_than_3 = sum(1 for num in array if num < 3)
print("Количество элементов массива, меньших 3:", count_less_than_3)
Примечание: Пожалуйста, убедитесь, что вы понимаете код, который вы используете, и проверьте его на своей стороне перед применением к какой-либо задаче.


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

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

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

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

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

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

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

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