Var s,t:integer;
begin
write ('s='); readln(s);
if (s>-10) and (s<10)
then writeln ('Число однозначное')
else begin
t:=s mod 10;
writeln (abs(t));
end;
end.
Решение показано в прилагаемом файле.
Формула:
=ЕСЛИ(C2<=2;0;ЕСЛИ(C2=3;0,2*B2;0,3*B2))
Ответ:
5.17 бит, 1.17 бит.
Объяснение:
а) в колоде одна дама пик, поэтому шанс ее достать равен 1 из 36.
По формуле Хартли получаем ㏒₂36 бит. Или, примерно, 5.17 бит.
б) Старше десятки в колоде из 36 карт будут валет, дама, король и туз. 4 карты одной масти. Мастей 4, поэтому всего таких карт 4×4=16. Шанс достать такую карту равен 16 из 36 или 4 из 9. Снова по формуле Хартли
получаем ㏒₂(9/4) бит. Или, примерно, 1.17 бит.
бита
байт, т.к. 8 бит=1 байт
Кбайт, т.к. 1 Кбайт=1024 байт
При двоичном кодировании используется алфавит, состоящий из любых двух символов.