1. сколько бит информации несёт каждое чётное однозначное число? 2. на компьютере набран текст, информационный объём которого-120 бит. сколько символов в тексте?

будем считать, что каждое четное однозначное число это определенный алфавит, мощность которого обозначается буквой n

n=2^i, подставим вместо n 2, получаем 2=2^i запишем левую часть как степень числа 2: 2^1=2^i, отсюда i=1 бит

подставим теперь вместо n 4, получаем 4=2^i запишем левую часть как степень числа 2: 2^2=2^i, отсюда i=2 бит

подставим теперь вместо n 6, получаем 6=2^i число 6 не является точной степенью числа 2, поэтому ответ найдем по таблице неточных степеней числа 2-   i=2,58 бит

подставим теперь вместо n 8, получаем 8=2^i запишем левую часть как степень числа 2: 2^3=2^i, отсюда i=3 бит

запишем условие: мощность компьютерного алфавита равна n=256

i=120 бит, к-?

решение: найдем вес одного символа 256=2^i, i=8 бит

разделим i на i и получим кол-во символов в тексте 120/8=15

1. "школьное" решение // pascalabc.net 3.0, сборка 1064 var   i,n1,n2: integer;   s: longint; begin   write('введите интервал для вычисления суммы: '); read(n1,n2);   s: =0;   if n1 mod 2 = 0 then i: =n1 else i: =n1+1;   while i< =n2 do begin s: =s+i; i: =i+2 end;   writeln('сумма четных чисел в интервале равна ',s) end. тестовое решение: введите интервал для вычисления суммы: 7 14 сумма четных чисел в интервале равна 44 2. современное решение // pascalabc.net 3.0, сборка 1064 var   n1,n2: integer; begin   write('введите интервал для вычисления суммы: '); read(n1,n2);   if odd(n1) then inc(n1);   writeln('сумма четных чисел в интервале равна ',range(n1,n2,2).sum); end.