1. Информатика
  2. Напишите программу которая

Напишите программу которая в последовательности натуральных чисел определяет количество чисел кратных 4. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число кратное 4 количество чисел не превышает 1000 введенные числа не превышают 30000 программа должна вывести одно число - количество чисел кратных 4

Pro100darik Pro100darik    1   07.09.2019 06:40    11

Ответы
shamil20042 shamil20042  06.10.2020 22:35
Var b,m,c,i:integer;
begin
readln(b);
m:=0;
readln(c);
for i:=2 to b do begin
if c mod 4=0 then m:=m+1;
readln(c);
end;
writeln(m);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Eva345678 Eva345678  08.05.2021 20:14
РЕШИТЕ С ОБЪЯСНЕНИЕМ в ИТ-компании работают 90 сотрудников. 55 сотрудников знают Java, 54 сотрудника - Python, 36 сотрудников - C++. Известно, что 51 сотрудник знает Python...
MrNeik1 MrNeik1  08.05.2021 20:15
Напишіть програму, яка моделює роботу наступного автомату: Автомат отримує на вхід тризначне число і створює нове число наступним чином: а) обчислює суми першої та другої,...
muckanvicktoria muckanvicktoria  08.05.2021 20:16
7. Звукозапись длительностью 90 сек. сохранили в формате моно (1 канал), с частотой дискретизации 16 кГц. Размер файла оказался равным 4000 Кбайт. Сжатие данных не производилось....
Страус123552 Страус123552  08.05.2021 20:26
Составить программу которая печатает true если точки с координатами ( x y ) принадлежит заштрихованной области и falge в противном случае рис 2...
zoga2003 zoga2003  15.03.2021 15:12
Напишите программу, в которой вводится число. Требуется вывести его так, что бы составляющие его цифры шли в обратном порядке. Например, вводится число 4096, надо вывести...
marychevakristi marychevakristi  15.03.2021 15:13
3. Заполни таблицу, используя информацию из интернета. NgТемаКоличествосайтовМесто храненияинформации накомпьютереАдрес сайтанайденнойинформации1.2.Астана – сердцестраны.Космодром«Байконур».Планеты...
dima1019 dima1019  15.03.2021 15:14
Будь ласка до іть вирішити задачу по інформатиці. Дуже дякую.​...
ННеетт ННеетт  15.03.2021 15:14
Каждый человек должен учиться программировать, потому что это очень нас думать чьи это слова?Стива ДжобсБилл Гейтс​...
IvanVano05 IvanVano05  06.10.2019 03:30
Дан массив целых чисел. найти количество нечетных элементов массива. (не используя const)...
suiunbailkyzy99 suiunbailkyzy99  25.01.2020 05:26
Информатика. ​3) из 11 получить 131- отняв 2.2- разделив на 2...

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