05061972
19.01.2023 13:42

Напишите программу на языке паскаль. требуется выяснить, является ли введенное пользователем число совершенным. совершенным называется такое число, сумма делителей которого равна этому числу, если не учитывать в ней последний делитель-само заданное число. например, число "6" является совершенным
числом, поскольку оно имеет три делителя: 1, 2, 3 и при этом 1+2+3=6, то есть самому числу

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Тим9775
10.10.2020 03:46

var N,i,k:integer;

BEGIN

readln(N);

k:=0;

for i:=1 to N div 2 do

if (N mod i=0) then

k:=k+i;

if (k=N) then

writeln('Да') else

writeln('Нет');

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота