
Вопрос задан 24.03.2021 в 16:15.
Предмет Информатика.
Спрашивает Филиппов Паша.
Информатика.Массивы Массив A вводится с клавиатуры.Сформировать новый массив B,состоящий из чётны
элементов массива А.Элементы вводятся с клавиатуры.Размер произвольный.

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

Отвечает Гутов Слава.
Const n=10;
var a,b:array[1..n] of integer;
i,j:integer;
begin
writeln('Введите ',n,' чисел');
for i:=1 to n do readln(a[i]);
j:=0;
for i:=1 to n do
if a[i] mod 2 = 0 then begin j:=j+1; b[j]:=a[i]; end;
writeln('Полученный массив:');
for i:=1 to j do write(b[i],' ');
writeln;
end.
Пример:
Введите 10 чисел
45
65
12
78
14
47
16
62
42
38
Полученный массив:
12 78 14 16 62 42 38
var a,b:array[1..n] of integer;
i,j:integer;
begin
writeln('Введите ',n,' чисел');
for i:=1 to n do readln(a[i]);
j:=0;
for i:=1 to n do
if a[i] mod 2 = 0 then begin j:=j+1; b[j]:=a[i]; end;
writeln('Полученный массив:');
for i:=1 to j do write(b[i],' ');
writeln;
end.
Пример:
Введите 10 чисел
45
65
12
78
14
47
16
62
42
38
Полученный массив:
12 78 14 16 62 42 38



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Вот решение задачи на Python:
python# Получаем от пользователя элементы массива A
a = input("Введите элементы массива через пробел: ").split()
# Преобразуем элементы в целочисленный тип
a = [int(i) for i in a]
# Создаем пустой массив B
b = []
# Проходим по каждому элементу массива A
for i in a:
# Если элемент четный, добавляем его в массив B
if i % 2 == 0:
b.append(i)
# Выводим массив B на экран
print("Массив B из четных элементов массива A:", b)
Пример работы программы:
lessВведите элементы массива через пробел: 1 2 3 4 5 6
Массив B из четных элементов массива A: [2, 4, 6]


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