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

86

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

категория: информатика

ответить

в избранное

88

serg66

18 февраля 2023

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

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Смотрите также:

Переведите ГБ в мегабайты 0,8 ГБ

Составьте программу для определения принадлежности точки заданными координатами (х, у) заштрихованной области

Заполните таблицу, используя указанные выше ссылки на источники информации: Тип переменной: 1Integer… .2real… 3char…

Как делается подстановка?

Помогите сделать информатику! Нахождение площади и периметра прямоугольника. Написать программу надо

Составьте таблицы умножения и сложения 12-ной системы счисления. Ребята, выручайте)

Перечислите основные элементы окон папок. Какие из них присутствуют в окнах известных вамприложений?

Художник для создания своей картины воспользовался красным и синим цветами. Всего в палитре у него было 8 цветов

Помогите с информатикой очень нужно 10 класс

27400

14822

Английский язык

14216

Биология

7369

720

Экономика

18829

8304

География

15850

Геометрия

5255

Информатика

11818

23332

15992

Литература

73118

Математика

8152

Обществознание

466

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...