Var i,p:integer;
begin
p:=1;
for i:=-20 to 30 do
if i mod 3 = 0 then p*=i;
writeln(p);
<span>end.</span>
На сколько информация доступна пользователю и на сколько она ему понятна
Формула Шеннона
I = log2 N , где I количество информации,
Обозначим количество полученных четверок - Ч, количество троек – Т, двоек– Д.
Т+Д=22
По условию задачи количество информации, содержащееся в сообщении «Абитуриент Иванов не провалился на экзамене», равно log2 3 бит.
Информационный объем сообщения «Абитуриент Сидоров получил тройку» равен двум битам.
.
Имеем систему из трех уравнений с тремя неизвестными.
Ч=2, Т=6, Д=22-6=16,
Всего 24.
Ответ: Количество абитуриентов, сдавших информатику, равно 24.
Рассмотрим минимальное число в 8й СС с четырьмя цифрами:
1000₈ = 00<span>10 0000 0000</span>₂ = 200₁₆.
Первое же число удовлетворяет условию. Переведем его в 10 СС
2 * 16² = 512₁₀
Ответ: 512