Нужна . введите с клавиатуры 5 положительных целых чисел. вычислить сумму тех из них, которые делятся на 4 и при этом заканчивается на 6. программа должна вывести одно число сумму чисел, кратных 4 и оканчивающихся на 6

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

Ответ:

kkarimov111

05.10.2020 04:05

Var
mas : array [1..5] of longint;
sum : longint;
i: byte;

begin

for i:=1 to 5 do
begin
read (mas[i]);
if (mas[i] mod 4 = 0) and (mas[i] mod 10 = 6) then sum:=sum+mas[i];
end;

writeln (sum);
end.

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

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

zhenya4534

03.10.2022 08:44

Ребят, какие есть приложения для обработки видео? например в тикток, где будут классные эффекты) (для андроида) ...

пати24

26.11.2021 03:10

1. Алгоритм дегеніміз не? Мысал келтір.2. Алгоритм командасы д/з не?3. Алгоритмнің қандай қасиеттері болуы керек?4. Алгоритмнің формалды атқарылуы дегенді қалайтүсінесіңдер?5. Алгоритмдердің...

minickotik

30.07.2020 01:20

1). Напишите программу, которая получает с клавиатуры возрасты трёх человек (Антона, Бориса и Виктора) и определяет, кто из них старше.Пример:Возраст Антона: 15Возраст Бориса: 17Возраст...

zubiks108642

17.02.2020 12:00

Предмет МДК Вариант № 4 Задание 1 Изобразите графически: G(V,E) - орграф. V={1,2,3,4,5,6}, E={(1, 6), (4, 5), (1, 2), (2, 3), (3, 6)}. Задание 2 ответьте на контрольные во Что называется...

780613

09.06.2023 07:22

Нужно написать на с++ 1)Сравнить мощность излучения тел максимум излучения которых приходится на длинуволны 400 нм и 600 нм; 2) Численно определить заряд через резистор R=10 Ом за...

нарешатор

21.08.2021 06:28

Не могу понять (встречен неожиданный символ ) на 7 строчке uses crt; var k: integer; n: integer; begin clrscr; writeln( тест по теме циклы ); 7 writeln( вопрос 1. алгоритм называют...

diaries1

07.09.2021 07:19

Информационная емкость человеческой яйцеклетки приблизительно равна 2 в 33 степени битов. сколько дискет емкостью 1,4 мбайт потребуется для размещения этой информации? заранее...

artyomfyodorov

07.09.2021 07:19

Используется кодовая таблица cp-1251(windows cyrillic).файл в простом текстовом формате,если в тексте 200 страниц,на странице 32 строки,а в строке в среднем 46 символов,будет занимать...

valaegorova34

23.02.2023 04:21

Как решить три (ниже) в паскаль? 1)определить командное время в эстафете, если известно время пробега каждого участника. 2) в саду 15 деревьев, известна высота каждого дерева. определить...

ксюнчик12

23.02.2023 04:21

Устройство вывода информации.имеет экран....

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

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