mstella2003
27.03.2021 13:30

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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Cfhbcbudh
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 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота