1 + (1/2) + (1/3) + (1/6) = 1 + (3/6) + (2/6) + (1/6) = 1 + 1 = 2
При использовании палитры из 16 цветов для хранения одного пикселя требуется log(2)16 = 4 бита. Объем памяти для хранения изображения = 53*53*4 бит = 11236 бит
Cначала спускаемся на а(6) потом на. б(6) потом на б(8)
var n,z,n1,e:integer;
begin
e:=0;
readln(n);
n1:=n div 2;
for z:=1 to n1 do begin
if (n mod z = 0) then e:=e+z;
end;
if (e=n)
then writeln('соверншенное')
else writeln('0');
end.