3 раза прибавляешь 1
3 раза увеличиваешь в 2-е
1 раз прибавляешь 1
И 2 раза увеличиваешь в 2-е
От 0 до 100 - это 101 разное значение. 64<101<128, значит для кодирования надо 7 бит, 128=2^7. 7*80=560 бит. 560 бит = 560/8 байт = 70 байт.
Ответ: 16 по основанию 8 --> 1*8^1+6 = 14 по основанию 10
35 по основанию 8 --> 3*8+5=29 по основанию 10
57 по основанию 8 --> 47 по основанию 10
103 по основанию 8 --> 1*8^2 + 0+ 3= 67 по основанию 10
177 по основанию 8 --> 64 + 56 + 7 = 127 по основанию 10
234 по основанию 8 --> 156 по основанию 10
3. 100011101 + 1001110 = 101101011
111000+110011 = 1101011
4. 11100111 - 11011 = 11000100
Программа выводит s=402
Описание программы :
Объявление целых переменных s,k
Присвоение нач. значения s=500
Цикл по k от 4 до 10
В цикле из текущего значения s вычитается удвоееное значение k и присваивается s
Вывод s
Var
n,x:string;
i:integer;
begin
write('Введите число n: ');
readln(n);
for i:=length(n) downto 1 do x:=x+n[i];
writeln('Обратное число: ',x)
<span>end.
или можно так:
</span>var
n:string;
begin
write('Введите число n: ');
readln(n);
writeln('Обратное число: ',ReverseString(n) )
end.