1. Информатика
  2. Дан массив, состоящий из

Дан массив, состоящий из целых чисел. напишите программу, которая выводит те элементы массива, которые являются чётными числами.

1000Умник 1000Умник    2   07.12.2019 15:34    0

Ответы
riad170310 riad170310  23.08.2020 10:25
#include using namespace std; int main(){ int n,i; cout<>n; int a[n]; for(i=0; i>a[i]; } cout<
Но я не уверенна
ПОКАЗАТЬ ОТВЕТЫ
KriStiNaTim03 KriStiNaTim03  23.08.2020 10:25

Pascal ABC.NET

const N=10000;

var a:array[1..n] of integer;

i,l:integer;

begin

writeln('Введите количество чисел');

readln(l);

writeln('Вводите числа');

for i:=1 to l do

read(a[i]);

for i:=1 to l do

if abs(a[i]) mod 2 =0then write (a[i]:4);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
gorkylush gorkylush  21.02.2020 19:31
В летний детский лагерь отдыха приехали ребята разных возрастов и их определили по трем отрядам: первый отряд – ребята 10-11 лет, второй отряд – 12- 13 лет и третий отряд – 14-15...
ЗАЙКА200515 ЗАЙКА200515  21.02.2020 19:26
Файл имеет информационный объём 448800 байт и содержится на 40 станицах на каждом странице 40 строк в каждой 32 символа найти информационный вес одного символа...
Помогите23441 Помогите23441  21.02.2020 19:24
Не все задачи могут быть выполнены с использованием линейного метода, и поэтому на приходят команды проверки условия. команды повторения команды проверки программы команды следования...
malina2017 malina2017  27.05.2019 17:30
Как из слова бант , заменяя по одной букве прийти к слову коса? (слово должно быть сущ.,в им.падеже) бант - - - - коса...
mashasmirnova1704 mashasmirnova1704  27.05.2019 17:30
Лабораторная работа № 6 тема: массивы (одномерные) цель работы: освоение приемов объявления, обращения и использования массивов при решении . типовые алгоритмы обработки одномерных...
АмерикаСингер852 АмерикаСингер852  27.05.2019 17:30
Определите качество звука, если известно, что объем моноаудиофайла длительностью звучания в 10 сек равен 940 кбайт. (напишите полное решение)...
NcsON NcsON  15.03.2021 12:00
1992 1415126Var Nazva. String:R, Period: Real,ConstPi = 3.1415-226;begin;Nazva := Editi.Text;R = Edit2.Text;V = Edit3. Text,Period := 2 *Pi R 7. V-24Edit 4Text := FloatToStr (Period:ShowMessage...
Caxapok24 Caxapok24  15.03.2021 12:01
На какие дисциплины опирается робототехника? * А)Электроника, механика, информатика, радиотехника и электротехника Б)Медицина, механика, электромеханика, электроника В)Робототехника,...
ппам ппам  15.03.2021 12:02
Графический редактор это ​...
976Марина1111111111 976Марина1111111111  15.03.2021 12:03
Напишите какой режим Необходимо выбрать чтобы вытолкнуть противника за линию​...

Популярные вопросы