Войти Регистрация Спроси ai-bota

Дано натуральное число. найти сумму его четных делителей pascal

Ответ:

слядя

28.06.2020 01:40

For i:=1 to n do begin
if ((n mod i = 0) and (i mod 2=0)) then sum:=sum+1;
end;

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

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

Совунья11

27.01.2022 17:41

Как получить данные от пользователя?...

haikyuu24

27.07.2022 21:07

Дайте акк в стандофф2 с ножом желательно дайте акк в стандофф2 с ножом желательно...

AlexPvP

22.05.2023 16:42

У исполнителя Калькулятор две команды, которым присвоены номера: вычти 2; умножь на 3. Первая из них уменьшает число на экране на 2, вторая — увеличивает его в 3 раза....

DaryaKovalkina

21.12.2020 10:19

Вариант 2 Информатика Excell...

karinasarova95

07.06.2022 21:30

У меня на наушниках имеется встроенный микрофон, но он не ловит мой голос, а звуки компьютера воспроизводит например в дискорд, как решить эту проблему?...

Kreyda

19.09.2022 23:49

А1. Программа – это:А) алгоритм, в котором команды выполняются последовательно одна за другой;Б) алгоритм, записанный с использованием блок-схем;В) алгоритм, записанный...

юлияиванова1

26.03.2022 16:52

написать программу в которой: вводится и выводится массив из 10 рандомных чисел (от - 10 до 10). Нужно найти сумму элементов массива и максимальное значение. Вывести...

NeSaRg00d04092003

25.09.2021 05:09

Изобразите в виде графа взаимосвязи между персонажами и различными предметами из сказки про Царевну-Лягушку. Иван Царевич пустил стрелу. Стрела прилетела к лягушке....

dariamisskapri

20.10.2021 07:54

Информатика 8 класс. быстро на решить...

89112897334artem1131

12.02.2021 14:32

Как называется вид спора спора на форме или в чатах...

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

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