Определить, является ли заданное натуральное число совершенным

@Maxym · Регистрация: 22.02.2011

Студворк — интернет-сервис помощи студентам

Определить, является ли заданное натуральное число совершенным, то есть равным сумме всех своих (положительных) делителей, кроме самого этого числа (например, число 6 совершенно: 6=1+2+3).

@PsiYar · 27.02.2011, 15:13

Pascal

uses crt;
var a,sum:integer;
i:byte;
begin
clrscr;
write('vvedite chislo: ');
readln(a);
for i:=1 to a div 2 do
if a mod i = 0 then sum:=sum+i;
if a=sum then writeln('chislo ',a,' soverschennoe')
else writeln('chislo ',a,' ne soverschennoe');
readln;
end.

@Марина! · 14.06.2011, 21:16

а можно в c#?

@Maxym 0 / 0 / 1 Регистрация: 22.02.2011 Сообщений: 35
		1
	Определить, является ли заданное натуральное число совершенным 27.02.2011, 15:02. Показов 7190. Ответов 2 Метки нет (Все метки) Определить, является ли заданное натуральное число совершенным, то есть равным сумме всех своих (положительных) делителей, кроме самого этого числа (например, число 6 совершенно: 6=1+2+3). 0

@Марина! 2 / 2 / 0 Регистрация: 07.06.2011 Сообщений: 6
	14.06.2011, 21:16	3
	а можно в c#? 0

Опции темы

Определить, является ли заданное натуральное число совершенным

Решение