Второе задание:
var a,b,y: integer;
begin
read(a,b,y);
if ((y<a) and (y>b)) or ((y>a) and (y<b)) then writeln('принадлежит') else writeln('не принадлежит');
<span>end.</span>
16 бит=2 байта....................
1.
1)1 = 3*1024*8/3072 = 8 бит объем одного символа
2) N = 2^8 = 256 символов в алфавите
2
1)Так как N=64=2^6, то I = 6 бит
2) 7200*8/6 = 9600 символов в тексте
<span>3) 9600/4/40 = 60 символов в строке </span>
1011010,1=1*2^6+1*2^4+1*2^3+1*2^1+1*2^-1=90.5