
Вопрос задан 28.09.2023 в 05:22.
Предмет Информатика.
Спрашивает Даниленко Юля.
Составьте программу, которая заполняет массив из 20 элементов случайными целыми числами от -50 до
50и выводит на экран сначала все отрицательные элементы, а затем все положительные элементы

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

Отвечает Морская Полина.
Ответ:
program test;
var i: integer;
a:array [1..20] of integer;
begin
randomize;
for i := 1 to 20 do
begin
a[i] := random (101)-50;
write (a[i]:5)
end;
writeln;
for i := 1 to 20 do if a[i] < 0 then write (a[i]:5);
for i := 1 to 20 do if a[i] > 0 then write (a[i]:5);
end.
Объяснение:
Сначала вывод всего массива, после в 1 строку сначала отрицательные, а за ними положительные (0 не выводится)



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для написания программы на языке программирования, например, на Python, вы можете использовать следующий код:
pythonimport random
# Заполняем массив из 20 элементов случайными целыми числами от -50 до 50
array = [random.randint(-50, 50) for _ in range(20)]
# Выводим исходный массив
print("Исходный массив:", array)
# Фильтруем отрицательные элементы и выводим их
negative_elements = [x for x in array if x < 0]
print("Отрицательные элементы:", negative_elements)
# Фильтруем положительные элементы и выводим их
positive_elements = [x for x in array if x >= 0]
print("Положительные элементы:", positive_elements)
Этот код создает массив из 20 случайных целых чисел от -50 до 50, выводит исходный массив, затем выводит отрицательные элементы, а затем положительные.


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