Program pr;
uses crt;
Var a,b,c,d:real;
Begin
Writeln('vv 4 chisla');
readln(a);
readln(b);
readln(c);
readln(d);
if (a=999) or (b=999) or (c=999) or (d=999) then Writeln('a=',a,' b=',b,' c=',c,' d=',d)
else Writeln('sum=',c+d);
readln;
end.
1) именительного падежа,единственного числа.
2)<span>следовательно, число не оканчивается на 0</span>
Неопределённость информации уменьшается в 3*3=9 раз, и такое кол-во информации кодируется минимум 4 битами.
1 О и М Б1 и Б2 к берегу2 -
2 О и М Б1 к берегу1 Б2
3 М и Б1 О к берегу2 Б2
4 М и Б1 Б2 к берегу1 О
5 М Б1 и Б2 к берегу2 О
6 М Б1 к берегу1 О и Б2
7 Б1 М к берегу2 О и Б2
8 Б1 Б2 к берегу1 О и М
9 - Б1 и Б2 к берегу2 О и М
Две диаграммы на одном листе