Комета Рассвет Спутник (Виталик и Андрей были правы, а Семен ошибся)
<span>файл, содержащий программу в виде, в котором она может быть (после загрузки в память и настройки по месту) исполнена компьютером.</span>
Var n,sum,d,ind,first:integer;
begin
Write('n');
Readln(n);
d:=1;
ind:=0;
sum:=0;
if n div d=0 then
begin
ind:=1;
sum:=n;
end
else
begin
while n div d<>0 do
begin
inc(ind);
sum:=sum+(n div d) mod 10;
d:=d*10;
end;
end;
Writeln('suma',Sum);
Writeln('kolvo',ind);
first:=(n div round(d/10)) mod 10;
writeln('first',first);
readln;
end.
Ответ в файле с расширением *.txt, потому что файлы *.kum не отправляются
Если хранить число без знака, то
- в 1 байт помещаются числа от 0 до 255 (2⁸-1)
- в 2 байта помещаются числа от 0 до 65 535 (2¹⁶-1)
- в 3 байта помещаются числа от 0 до 16 777 215 (2²⁴-1)
- в 4 байта помещаются числа от 0 до 4 294 967 296 (2³²-1)
Задано число <span>33 554 433 и для его размещения потребуется <u>4 байта.</u>
Можно, конечно, этим всем не заниматься, </span>если есть возможность вычислять логарифмы. В данном случае логарифм по основанию 2, округленный в большую сторону до целых, даст необходимое для представления числа количество битов.
㏒₂<span>33554433 = ㏑</span><span>33554433/㏑2 ≈ 25.00000004 ⇒ 26 бит требуется
Переводим в байты</span>: 26/8 = 3.25 , т.е. потребуется <u>4 байта</u>.