tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти количество чётных
Найти количество чётных элементов массива
misha666anibeat
1 06.06.2019 16:20
1
Ответы
alekseevvv
06.07.2020 19:23
Var a:array[1..20] of integer;
i,k:integer;
begin
for i:=1 to 20 do begin
read(a[i]);
if not odd(a[i]) then k+=1;
end;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Auebandit1337
09.02.2022 04:15
Вычислите √2 двумя : с функции и с операции возведения в степень....
Ира2806
09.02.2022 04:08
Відкрийте середовище розробки програмного забезпечення idle та створіть новий файл Python.На вході маемо цільночислену матрицю та ціле число.Задача програми знайти це число в матриці...
илья5310
16.05.2020 12:18
1. Сложите числа и переведите результат в десятичную систему счисления: а) 1011101, и 110111; б) 10H101, и 1010, в) 101 101, и 1010, г) 11101, и 1 101,; д) 101111, и 1; е) 10111,...
5бкрутой
16.05.2020 12:18
При регистрации нового ящика электронной почты пользователя обычно ввести, помимо прочего, желаемый логин, а также резервный адрес электронной почты (на случай, если понадобится...
StePAHka228
16.05.2020 12:18
Сколько натуральных чисел расположено в интервале 157^8 x 84^16...
Аносип
16.05.2020 12:18
5. Дана программа с циклом:For x in range(7):х=х+3print(x)print( end ]Какие значения будет принимать переменная хв процессе выполненицикла?Что будет выведено на экран в результате...
сонечка281006
16.05.2020 12:17
3. Выписали все трёхзначные числа в порядке возрастания, составленные из цифр 0, 2, 4, 6. В записи числа цифры не повторяются. Какое число будет стоять на одиннадцатом месте? Решите...
maksimtihonov34
16.05.2020 12:17
составить программу для построения корабликов (4 задание)...
mvalinka
16.05.2020 12:17
2. ответить на во в тетради 1. Чтобы изменить параметры страниц в текстовом редакторе Word следует выполнить какую команду? 2. Печать документа выполняется с какой команды? 3.Какую...
keklol291
16.05.2020 11:56
Сколько бит памяти занимает чёрно-белое изображение (без градаций серого) шириной 1000 точек и высотой 90 точек? ответ: бит...
Популярные вопросы
Придумайте четырехугольник который можно разделить на три части одной прямой...
1
Выпиши слова с парными согласными на конце и слова с непроверяемыми гласными...
3
Дано слово из 12 букв. поменять местами его трети следующим образом: первую...
2
Вчем состоит опасность обвалов, лавин? последствия снежных лавин?...
3
Решите : 1)в вагон погрузили 30 мешков сахара и 200 мешков соли .масса мешка...
3
Напісаць 5 парад то як паводзіць сябе на ўроку...
1
Сколько слов здесь записано? запиши ответ цифрой. (на место пропуска можно вставить...
2
Вычислите с формул : а) cos 5п\3 б) sin(-11п\6)...
1
Зависит ли здоровье леса от чистоты воздуха...
1
Как садовотство в вашем крае связано с его природными условиями...
3
i,k:integer;
begin
for i:=1 to 20 do begin
read(a[i]);
if not odd(a[i]) then k+=1;
end;
writeln(k);
end.