Найти мощность алфавита вес символа 6 бит всего символов 493 найти информационный вес

Надо 6 бит умножить на количество символов то есть у нас 493 символа 6(бит)*493(символа)=2958(бит)  но обычно 1 символ кодируется либо 8 бит либо 16 и т.д. я посчитаю тебе и на 8 (бит) 8(бит)*493(символа)=3944(бит)

чтение из файла обычно пишется readln(f,s) где f имя файловой переменной так что скорей всего нужно вставить

readln(input,s); s: =s+' '; f: =0; for i: = 1 to length(s) do beginif s[i]< > ' ' then r: =r+s[i]; if s[i]=' ' then begin k: =k+1; d[k]: =r; r: =''; end; end; readln(input,n); for i: = 1 to n do beginreadln(input,sait[i]); readln(input,tegs[i]); readln(input,pop[i]);

соответственно и запись в файл write(f,s)

по формуле включений-исключений

35 = 24 + 18 + 12 - 5 - 10 - 8 + х

х = 4

 

чтобы понять формулу, надо нарисовать 3 круга которые имеют общую область пересечения