Var ch:integer;beginread(ch);while ch>0 do begin if (ch mod 2)=0 then begin ch:=ch div 2; write(2); end else begin ch:=ch-1; write(1); end; end;end.
<span>№1:</span>
<em><span>Для перевода целой части необходимо умножить разряд числа на соответствующую ему степень разряда.</span></em>
<span>101 = 2<span>^{2}</span></span><span>*1 + 2<span>^{1}</span></span><span>*0 + 2<span>^{0}</span></span><span>*1 = 4 + 0 + 1 = 5</span>
<em>Для перевода дробной части необходимо разделить разряд числа на соответствующую ему степень разряда</em>
101 = 2<span>^{-1}</span>*1 + 2<span>^{-2}</span>*0 + 2<span>^{-3}</span>*1 = 0.625
Аналогично:
№2
101 = 2<span>^{2}</span>*1 + 2<span>^{1}</span>*0 + 2<span>^{0}</span>*1 = 4 + 0 + 1 = 5
101000 = 2<span>^{-1}</span>*1 + 2<span>^{-2}</span>*0 + 2<span>^{-3}</span>*1 + 2<span>^{-4}</span>*0 + 2<span>^{-5}</span>*0 + 2<span>^{-6}</span>*0 = 0.625
№3
<span>11001 = 2<span>^{4}</span></span><span>*1 + 2<span>^{3}</span></span><span>*1 + 2<span>^{2}</span></span><span>*0 + 2<span>^{1}</span></span><span>*0 + 2<span>^{0}</span></span><span>*1 = 16 + 8 + 0 + 0 + 1 = 25</span>
101000 = 2<span>^{-1}</span>*1 + 2<span>^{-2}</span>*0 + 2<span>^{-3}</span>*1 + 2<span>^{-4}</span>*0 + 2<span>^{-5}</span>*0 + 2<span>^{-6}</span>*0 = 0.625
№4
<span>10100 = 2<span>^{4}</span></span><span>*1 + 2<span>^{3}</span></span><span>*0 + 2<span>^{2}</span></span><span>*1 + 2<span>^{1}</span></span><span>*0 + 2<span>^{0}</span></span><span>*0 = 16 + 0 + 4 + 0 + 0 = 20</span>
101 = 2<span>^{-1}</span>*1 + 2<span>^{-2}*</span>0 + 2<span>^{-3}</span>*1 = 0.625
<em> Если не понятен значок</em><em> ^{ } - это степень.</em>
Вложение к следующему заданию
84 - 6 = 78 играют в компьютерные игры
53 + 63 = 113 играют в квесты и симуляторы (всего)
113 - 78 = 35 играют и в квесты, и в симуляторы
Представление текстовых данных, представление графической информации, представление звуковой информации, представление видео. Я написала только способы предоставления информации. Надеюсь помогла
