Напишите логическую функцию которая определяет верно ли что число N

June 2022 1 36 Report

Напишите логическую функцию которая определяет верно ли что число N - совершенное, т.е. равно сумме своих делителей, меньших его самого

Answers & Comments

Gleb1Kosyrev

Verified answer

//Другой вопрос где найти такое число.
//Pascal ABC.NET v3.0 сборка 1111

function Abso(n:integer):boolean;
Var
i,k:integer;
begin
k:=0;
for i:=1 to n div 2 do
if n mod i=0 then k:=k+i;
if k=n then Abso:=true else Abso:=false;
end;

25 votes Thanks 18

Answers & Comments

Verified answer

napishite funkciyu kotoraya vychislyaet n e chislo fibonachchi

napishite proceduru kotoraya opredelyaet verno li chto peredannoe ej chislo prostoe

druzhestvennye chisla eto dva naturalnyh chisla takih chto summa vseh delitelej

napishite proceduru kotoraya prinimaet parametr naturalnoe chislo n i vyvodit pe

napishite funkciyu kotoraya vychislyaet maksimalnoe iz treh chisel

napishite funkciyu kotoraya modeliruet brosanie dvuh igralnyh kubikov na kazhdom9627a48fcba68f7a3ded833064728971 10411

napishite funkciyu kotoraya vychislyaet kolichestvo cifr chisla

napishite programmu kotoraya vvodit naturalnoe chislo i nahodit vse chisla na otre3629122bcde4ee8caf6685c3ebbb028c 23687

v programme opisan odnomernyj celochislennyj massiv s indeksami otd05c3fb1c88a68236ed340f26e85a7d5 55546

рекомендуемые вопросы

Helpful Links

Helpful Social