Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kakaha7
30.05.2021 02:20 •
Информатика
Дано натуральное число. найти сумму его четных делителей pascal
Показать ответ
Ответ:
wiamous1
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 оценок)
Популярные вопросы: Информатика
eataev
08.02.2020 03:15
Вдесятичной записи числа 42**4 замените звездочки цифрами , если известно , что число кратно 72. выведите найденные числа на экран...
lexiagahadi
11.07.2020 15:12
Эту кнопку используют для того чтобы регулировать громкость,...
danilrykov200
12.04.2022 07:10
выполнить задание по информатике. Составить тур по мексике . Все условия в документе...
alievosman
23.07.2022 08:36
Ребят позязя оч надо. Много ! Петр Петрович поразился, когда узнал, что его пьяный сосед с трудом выговаривает 20 букв, если измерить их объём, то получится 12,5...
epifya
23.07.2022 08:36
Практическая: 1. Постройте логическую схему и таблицуистинности по заданной логической функции: 2. Запишите логическую функцию, описывающую состояниелогической...
Ямайкамафака
21.11.2020 17:03
Ребят много дам очень сильно надо. У первой условие таково: Можно ли определить количество букв в тексте, если известно, что после перекодировки этого текста из...
MMMOZG
25.08.2021 09:04
Задание 3. Задача «Стоимость покупки». Пирожок в столовой стоит x тенге, пирожное стоит в 2 раза дороже, дороже, чем пирожок. Определите, сколько тенге нужно заплатить...
8HELP8
16.03.2021 13:53
Каогда нофое обновление AFK arena ?...
2003tanya
19.04.2021 17:01
Недостаток схемы линейного квантования в аналого-цифровом преобразователе заключается в том, что: Отношение мощности сигнала к мощности шума квантования уменьшается...
TheGrigory
28.01.2022 09:34
с этими заданиям, оч надо...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
if ((n mod i = 0) and (i mod 2=0)) then sum:=sum+1;
end;