Написать программу, которая определяет количество четных чисел из введенной с клавиатуры последовательности n чисел. написать программу на паскале.

Показать ответ

Ответ:

kburdenko01

21.06.2020 04:12

Например если вводится 3 числа

var a,b,c,x:integer;
begin
x:=0;
Read(a,b,c);
if a mod 2=0 then x:=x+1
if b mod 2=0 then x:=x+1;
if c mod 2=0 then x:=x+1;
Writeln('Chetnuh chisel =' ,x);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

MaxPositiv

31.10.2022 07:09

Создайте процедуру с параметрами, которая получает целое число, а возвращает подъема его к произвольному степени. в среде паскаль....

zlatasidorowa

07.05.2022 08:53

Необходимо нарисовать 57 одинаковых вертикальных палочек.Дан алгоритм .Выбери верный ответ. использовать Чертежник алг черточки 11 нач сместиться в точку (-4,3) нц...

Shamsik05

07.05.2022 08:53

напишите программу(Pascal), которая вычисляет произведение первых n членов ряда 1, ½, 1/3, ¼ Количество членов ряда задается во время работы программы (используя...

Гольник

01.07.2021 10:50

КАК МОЖНО БЫСТРЕЕ Информационная безопасность — это: A) процесс обеспечения конфиденциальности B) процесс обеспечения конфиденциальности, целостности и доступности...

BoPoHoK

27.07.2022 16:57

1.за яких умов можна на компьютере переглянути відеофільм, послухати музику? 2. як запустити на виконання обрану програму?...

VaSa4547

27.07.2022 16:57

Добрые люди. с клавиатуры вводятся дейстивительные числа и последовательно суммируются. когда их сумма превысит 150, найти количество введенных чисел и их сумму....

TigerForceCasual

24.04.2023 20:14

Тест по Восточной Сибири 1)О каком народе, проживающем в Восточной Сибири, идет речь? Он относится к алтайской семье монгольской группы, является титульной нацией...

o123456789

24.04.2023 20:14

Какие организмы очень быстропередвигаются? СредаКакие организмы по скоростипередвижения находятся на 2 месте?Среда Какие из этой группы первые(стопоходящие, пальцеходящие,копытные)?...

1483983829

24.04.2023 20:14

Вот задание: Стр 121 написать свои примеры для свойств кислот и оснований (молекулярные и ионные уравнения) (цитата из электронного) Страница во вложении, буду благодарен...

dalelodaryn

18.02.2020 04:12

Три резистори R = 125 Ом з єднані по схемі зірка та підключені в трифазну мережу. Струм кожної фази 1,76 А. Знайти діюче значення фазної напруги...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку