Var
a,i,n:integer;
begin
readln(a);
while a>0 do
begin
inc(i);
a:=a div 10;
end;
writeln(i);
<span>end.</span>
<span>Нужно определить, сколько времени будет передаваться файл объемом 5 Мбайт по каналу со скоростью передачи данные 2</span>15<span> бит/с; к этому времени нужно добавить задержку файла у Толи (пока он не получит 512 Кбайт данных по каналу со скоростью 2</span>19<span> бит/с). </span>
<span>Периведём объём информации в Мб в биты: Q = 5 Мб = 5 * 2</span>20<span> байт = 5 * 2</span>23<span> бит. </span>
<span>Время задержки: </span><span> = 512 кб / 2</span>19<span> бит/с = 2</span>(9 + 10 + 3) - 19<span> c = 2</span>3<span> c. </span>
<span>Время скчивания данных Мишей: </span><span> = 5 * 2</span>23<span> бит / 2</span>15<span> бит/с = 5 * 2</span>8<span> c. </span>
<span>Полное время: </span><span> = 5 * 2</span>8<span> c + 2</span>3<span> c = (256 * 5 + 8) c = 1288 c. </span>
<span>Ответ: 1288.</span>
1)y:=sqrt(a)-sqr(c)/sin(x-sqr(a))
2)y:=sqrt(c)/x-sqr(a)+3*pi
3)y:=3*b-1/8*(c+2)-sqrt(5*b)-8*c+3*pi
4)p:=sqrt(sqr(sqr(x)-x)+sqr(sqr(y)-y))
1)449(10)=111000001(2)
2)667(8)=110110111(2)
3)9999(10)=270F(16)
4)665(10)=1231(8)
5)CD66(16)=1100110101100110(2)
6)C,66(16)=12,39(10)
7)10110,1101(2)=26,64(8)
8)10011,11(2)=13,C(16)
<span>1834(8) - так как максимальный разряд 7, а тут присутствует 8</span>
1А00(2) - A не относится к двоичной системе