Program asd;
Var s,x,x1:integer;
begin
read (x,x1);
if (x mod 2=0) and (x1 mod 2=0)
then s:=(x+x1)/2
else s:=s:=(x-x1)/2
end.
Program vtoroeZad;
Uses crt;
var x:integer;
begin
if (x div 100)>(x mod 10)
then write ('da')
else write ('net');
end.
Ответ:
5 бит, 32 символа
Объяснение:
Вычислим количество символов в сообщении.
6 * 40 * 60 = 14400
Вес сообщения: 9000 байт = 9000*8 бит = 72000 бит
Значит, на один символ приходится 72000 / 14400 бит = 5 бит.
Количество символов в алфавите равно .
F=¬(X*Y)+¬(Y+Z)
преобразование:
F=¬X+¬Y+¬Y*¬Z
F=¬X+¬Y(1+¬Z)
F=¬X+¬Y
---------------------------------------------------
XYZ ¬X ¬Y F
000 1 1 1
001 1 1 1
010 1 0 1
011 1 0 1
100 0 1 1
101 0 1 1
110 0 0 0
111 0 0 0