256 Кбайт=8*1024*256 бит
<span>8*1024*256 бит/512/128=32 бит
</span>2^32=4294967296 цветов
var a,b,c,d,e: integer;
begin
write('Введите a=');
read(a);
b:=10;
c:= a+b;
writeln('Сумма равна ',c);
e:=0;
while c>0 do
begin
d:=c mod 10;
c:=c div 10;
e:=e+1;
end;
writeln('В числе ', e, ' цифр(-a/-ы)');
end.
Вариант в Excel.
Лист защищен без пароля, чтобы случайно не повредить формулы.
Снимаете защиту, копируете элементы, получаете ответ.