1. Конфеты находятся в одной из 10 коробок. Определить количество информации.
2. Тетрадь лежит на одной из двух полок - верхней или нижней. Сколько бит несет в себе сообщение,
что она лежит на нижней полке?
3. Шарик находится в одной из трех урн: А, В или С. Определить количество информации.
4. Шарик находится в одной из 32 урн. Сколько единиц информации будет содержать сообщение о
том, где он находится?
5. Сколько вопросов следует задать и как их нужно сформулировать, чтобы узнать с какого из 16
путей отправляется ваш поезд?
6. Какое количество информации получит первый игрок после первого хода второго игрока в игре
"крестики - нолики" на поле 4 х 4?
7. После реализации одного из возможных событий получили количество информации равное 15
бит. Какое количество возможных событий было первоначально?
8. Определить стратегию угадывания одной карты из колоды из 32 игральных карт (все четыре
шестерки отсутствуют), если на вопросы будут даны ответы "да" или "нет".
9. При игре в кости используется кубик с шестью гранями. Сколько бит информации получает игрок
при каждом бросании кубика?
10. В библиотеке 16 стеллажей. На каждом стеллаже по 8 полок Библиотекарь сказал Оле, что
интересующая ее книга находится на 3 стеллаже, на 2-й сверху полке. Какое количество
информации получила Оля?
11. В мешке находятся 30 шаров, из них 10 белых и 20 черных. Какое количество информации несет
сообщение о том, что достали белый шар, черный шар?
12. В корзине лежат 32 клубка шерсти. Среди них – 4 красных. Сколько информации несет
сообщение о том, что достали клубок красной шерсти?
13. В коробке лежат 64 цветных карандаша. Сообщение о том, что достали белый карандаш, несет
4 бита информации. Сколько белых карандашей было в корзине?
14. В ящике лежат перчатки (белые и черные). Среди них – 2 пары черных. Сообщение о том, что из
ящика достали пару черных перчаток, несет 4 бита информации. Сколько всего пар перчаток было
в ящике?
15. В классе 30 человек. За контрольную работу по математике получено 6 пятерок, 15 четверок, 8
троек и 1 двойка. Какое количество информации в сообщении о том, что Иванов получил четверку?
Program Markovsp1;
uses crt;
const
eps=0.001;
var
t,s:real;
i:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
writeln();
writeln('Программа вычисляет частичную сумму ряда ');
writeln(' S=1+1/(2^2)+1/(3^2)+1/(4^2)+... ');
writeln('Вычисление прекратится, когда модуль очередного слагаемого станет меньше 0,001');
используется цикл repeat');
writeln();
s:=0;
i:=1;
repeat
t:=1/((i)*(i));
s:=s+t;
//writeln('i=',i,' T=',t:0:6,' S=',s:0:6);
i:=i+1;
until abs(t)<eps;
writeln('s=',s:0:6,' (pi^2)/6=',(pi*pi)/6:0:6);
writeln('Приближение к (pi^2)/6 равно ',s-(pi*pi)/6:0:6);
end.
Program Markovsp2;
uses crt;
const
eps=0.001;
var
t,s:real;
i:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
writeln();
writeln('Программа вычисляет частичную сумму ряда ');
writeln(' S=1+1/(2^2)+1/(3^2)+1/(4^2)+... ');
writeln('Вычисление прекратится, когда модуль очередного слагаемого станет меньше 0,001');
используется цикл while');
writeln();
s:=0;
i:=1;
t:=1;
while t>eps do
begin
t:=1/(i*i);
s:=s+t;
//writeln('i=',i,' T=',t:0:6,' S=',s:0:6);
i:=i+1;
end;
writeln('s=',s:0:6,' (pi^2)/6=',(pi*pi)/6:0:6);
writeln('Приближение к (pi^2)/6 равно ',s-(pi*pi)/6:0:6);
end.
Program Albinur;
uses crt;
var
v0,a,t : real;
begin
writeln('Программа вычисляет скорость объекта при равноускоренном движении');
writeln(' в заданный момент времени');
write('Введите начальную скорость в м/с '); readln(v0);
write('Введите ускорение в м/с^2 '); readln(a);
write('Введите время в с '); readln(t);
writeln(); writeln();
writeln('*** Вычисляю... ***');
writeln(); writeln();
writeln('Через ',t,' секунд после начала движения скорость объекта будет равна ',v0+a*t,' м/с');
end.