Program n_1;
var x, n, s: integer;
begin
x:=-1;
s:=0;
read(x);
if x=0 then writeln('0 0')
else begin
n:=0;
while x<>0 do begin
n:=n+1;
if(x>0) and (x<=22) and (x mod 2 = 0) then s:=s+x;
read(x);
end;
writeln(n, ' ', s);
end
end.
Собственно,
формула:
I = K*i ,
где I – количество информации в текстовом сообщении (информационный объем текста) ,
K – количество символов в текстовом сообщении,
i – информационный вес одного символа
исходя из формулы:
N = 2^i ,
где N – мощность алфавита,
i – информационный вес одного символа
находим, что мощность 1 алфавита = 16 = 2^4
мощность второго = 256=2^8
соответственно, количество инф в первом случае K*4, а во втором, К*8.
<span>Итого, количество информации во втором тексте больше в 2 раза. </span>
1)1*2=2
2)2*2=4
3)4*2=8
4)8+3=11
5)11*2=22
6)22*2=44
7)44+3=47
Виды информации(многоуровневый список, 2 уровня в данном случае):
1текстовая
1.1книги
1.2журналы
1.3статьи в интернете
2звуковая или аудио
2.1живая речь
2.2песни
2.3аудиокниги
Строка меню-2,кнопки управления окном-3,заголовок окна-1