Написать программу ( в Pascal abc): Вводится 3 целых числа. Сколько среди них будет чётных чисел, оканчивающихся на 8

Var a:array [0..5] of Integer; n,h,i:Integer;
begin
h:=0;
for i:=0 to 5 do
Readln(a[i]);
for i:=0 to 5 do
if (a[i] mod 2=0) and (a[i] mod 10=8) then
Inc(h);
Writeln(h);
readln;
end.

Оцени ответ

Не устраивает ответ?

Если твой вопрос не раскрыт полностью, то попробуй воспользоваться поиском на сайте и найти другие ответы по предмету Информатика.

Найти другие ответы

Недавние вопросы

Информатика, опубликовано 20.10.2020

Какое число нужно добавить к набору, чтобы среднее арифметическое увеличилось на 0,1? 1,1 –3 2,7 –4,1 2,4 3,9 –0,9

Информатика, опубликовано 20.10.2020

⦁Дайте определение термину «информация». Укажите классификацию информации по форме представления. ⦁Что такое код? Приведите примеры кодов, с которым вы постоянно...

Информатика, опубликовано 06.05.2020

Сканируется цветное изображение размером 15,24×15,24 см. Разрешающая способность сканера — 600×1200 dpi, глубина цвета — 24 бита. Какой информационный объём будет иметь...

Информатика, опубликовано 18.06.2019

Помогите пожалуйста, буду очень благодарен ! Надо написать программу на языке Паскаля. Спортсменам фигуристам шесть судей выставляют оценки. Технический работник соревнований изымает максимальную и...

Информатика, опубликовано 18.06.2019

Электронная таблица-это а)прикладная программа,предназначенная для обработки структурных в виде табличных данных б)прикладная программа для обработки кодовых таблиц в)устройство ПК,управляющее его...

Информатика, опубликовано 18.06.2019

Выбрать правельный ответ.....Электронная таблица-это а)прикладная программа,предназначенная для обработки структурных в виде табличных данных б)прикладная программа для обработки кодовых таблиц ...

Информатика, опубликовано 18.06.2019

По нескольким определениям отгадайте термин информатики Текстовое,числовое,денежное,ключевое,логическое - Ответ записать в именительном падеже единственном числе

Информатика, опубликовано 18.06.2019

Приведите примеры известного вам программного обеспечения компьютера. программное обеспечение - игра, пример - ?

Информатика, опубликовано 18.06.2019

Написать программу ( в Pascal abc): Вводится 3 целых числа. Сколько среди них будет чётных чисел, оканчивающихся на 8

Информатика, опубликовано 18.06.2019

Дано натуральное число n( n<9999). cколько цифр в числе n . паскаль

Информатика, опубликовано 18.06.2019

Что называется рабочей книгой в эксель?

Информатика, опубликовано 18.06.2019

Перевести в байты: 1) 72кб= 2) 340мб= 3) 7 гб= Перевести в килобайте: 1) 25 000байт= 2) 257мб= 3) 30гб= Зарание спасибо))!

Информатика, опубликовано 18.06.2019

Задача F Четный палиндром Подстрокой строки называется любая непустая последовательность символов в строке. Палиндромом называется строка, которая читается одинаково слева и справа. У Азизхана есть...

Информатика, опубликовано 18.06.2019

Задано два целых числа А и В найдите сумму ничетных чиселот А до В

Информатика, опубликовано 18.06.2019

В школу привезли 24 компьютера и распределили их между кабинетами №30 и №20. Сообщение «Неисправный компьютер находится в кабинете №20» несёт три бита информации. Найдите, сколько компьютеров...

Другие вопросы в категории Информатика

Информатика, опубликовано 13.06.2019

Помогите пожалуйста решить ребус

Информатика, опубликовано 13.06.2019

Вычислить y= │x-2│ по определению модуля на PascalABC и C++ Заранее спасибо!

Информатика, опубликовано 13.06.2019

Напишите пропущенные команды.Ввести с клавиатуры массив В,из 13 элементов целого типа,нумерация элементов начинается с 1 и вывести все элементы массива уменьшенные на 71.Паскаль

Информатика, опубликовано 13.06.2019

Найти пропущенные команды . Ввести с клавиатуры массив А ,из 155 элементов вещественного типа ,нумерация элементов начинается с 1 и заменить элементы с отрицательными номерами на число 729. Вывести...

Информатика, опубликовано 13.06.2019

Сделать ложные высказывания истинными: вид алгоритма зависит от его представления

Информатика, опубликовано 13.06.2019

3BC16 записать в десятичной системе счисления.

Информатика, опубликовано 13.06.2019

Запиши число 12661 в развёрнутом виде, начиная со старшего разряда.

Информатика, опубликовано 13.06.2019

Составьте программу (На Паскале )Найдите все значения у на промежутке от -5 до 5 .Функция y = 2x +4

Информатика, опубликовано 13.06.2019

Решите дам 30 баллов

Информатика, опубликовано 13.06.2019

Решите дам 30 баллов

Информатика, опубликовано 13.06.2019

Помогите плиз дам 25 балов

Информатика, опубликовано 13.06.2019

Решите дам 30 баллов

Информатика, опубликовано 13.06.2019

Решите дам 30 баллов

Информатика, опубликовано 13.06.2019

Решите дам 30 баллов

Информатика, опубликовано 13.06.2019

На промежутке от а до в найти: 1. Сумму чисел кратных m.2. Количество четных чисел. Задачи решить с помощью 3 циклов. Не забудьте про блок-схемы

Вопросы из других категорий

Математика, опубликовано 13.06.2019

Помоги решит пожалуйста 1 вариант

Химия, опубликовано 13.06.2019

Самостоятельная работа 1 вариант. 1. Определить массовую долю растворенного вещества (\%) NaCl, если в 380 г воды растворено 20 г NaCI. 2. Сколько граммов NaOH содержится в растворе массой 250 гс...

Математика, опубликовано 13.06.2019

Теплоход с туристами отправился от пристани вниз по течению реки и вернется обратно через 5 часов . Скорость течения реки 3 км/ч; скорость теплохода в стоячей воде 18км/ ч . На какое расстояние...

Физика, опубликовано 13.06.2019

В цепи Е1= 130 В; Е2 = 85 В; R1= R3 = 20 Ом; R2= 40 Ом; r1 = r2 = 0. Определить токи в ветвях.

Информатика, опубликовано 13.06.2019

По окончании каждого месяца Буратинл приносит папе Карло свой заработок в Х золотых монет. Папа Карло за следующий месяц тратит ровно половину имеющиеся на его начало денег. В начале срока у них было...

Русский язык, опубликовано 13.06.2019

Эссэ на тему. Вода источник жизни

Физика, опубликовано 13.06.2019

СРОЧНО‼️‼️Даю 48 баллов.Заранее большое спасибо:)

Русский язык, опубликовано 13.06.2019

Глаголы интерпретации, параметров (привести примеры)?

Химия, опубликовано 13.06.2019

Напишите структурные формулы 1) 2,3-диметил-3-этилпентен-1; 2)2-метил-5-этилгексадиен-2,3

Английский язык, опубликовано 13.06.2019

39 b!!!!!!!Write a short paragraph about Vietnamese people( about 15-20 line)<3 everyone!p/s: can you write some word in Vietnamese like: "xin chào"?

Математика, опубликовано 13.06.2019

Допоможіть будь ласка ! Потрібно знайти не визначений інтеграл

Математика, опубликовано 13.06.2019

Другие предметы, опубликовано 13.06.2019

50 баллов хелп с тех мехом

Математика, опубликовано 13.06.2019

Найти первообразную функции f(x)=3x^2-x,график которой проходит в через точку (2;8)

Русский язык, опубликовано 13.06.2019

Нужна ли запятая после "Когда-то", если оно стоит в начале предложения?