Напишите программу на языке паскаль. требуется выяснить, является ли введенное пользователем число совершенным. совершенным называется такое число, сумма делителей которого равна этому числу, если не учитывать в ней последний делитель-само заданное число. например, число "6" является совершенным
числом, поскольку оно имеет три делителя: 1, 2, 3 и при этом 1+2+3=6, то есть самому числу
vika3v
3
08.10.2019 08:40
0
Другие вопросы по теме Информатика
FubZ1k
19.06.2019 06:20
lanv
19.06.2019 06:20
nicekuzia01
01.03.2021 15:47
is835172Alexandr
20.07.2019 02:50
anel1985
20.07.2019 02:50
YouSister
20.07.2019 02:40
lampec1
20.07.2019 02:40
natik49
20.07.2019 02:40
михалыч676
20.07.2019 02:40
Популярные вопросы
- По учебника определи названия нескольких растений, запиши...
1 - Вообрози что ты живешь на необитаемом острове.придумай при которое считать...
2 - Читайте начало письма алана к своему другу. сколько неправильных глаголов...
2 - Для составления набора конфет 3 кг карамели по 65 р. за 1 кг и 2 кг шоколадных...
1 - Напишите план к песне первой (руслан и людмила)...
3 - Характеристика дубровского и троекурова(без ошибок и не берите с интернета))...
2 - 55 градусов сев широты 69 вос долготы 45 градусов сев широты 65 вос долготы...
3 - Яуже целых 18 лет учусь и стремлюсь но ответа нет в чем секреты успешных...
1 - Поезд через 10 с после начала движения делает скорость 0,6 м/c. через сколько...
2 - Всплав входя медь, олово и цинк в отношении 4 : 15 : 6. а) какова масса каждого...
2
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.