Регистрация
Sevchi
Есть ответ 👍

Натуральное число М называется совершенным, если оно равно сумме всех своих делителей, включая 1, но исключая себя. (программа Паскаль)

262
466
Посмотреть ответы 2

Ответы на вопрос:

Djdjdhjx
Djdjdhjx
4,6(27 оценок)
program delitel_cisla;
var i,h,del,f:longint;
begin
writeln('napiste maximalni cislo');
f:=0;
readln(i);
while i>=1
 do
 begin
   for del:=1 to i do
    if(i mod del)=0 then
    begin
     {writeln('delitel= ', del);}
       f:=f+del;
    end;
   h:=f-del;
   {writeln('suma delitelej=', h);}
   f:=0;
   i:=i-1;
    if h=del then writeln('sovershennoje cislo = ', h)
 end;
end.
beyn1oyc4cd
beyn1oyc4cd
4,8(53 оценок)

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

Популярно: Другие предметы