Вот.................................................
Ответ: 56. цикл выполнится 4 раза, а значит "s+14" повторится 4 раза
//Pascal ABC.NET v3.1 сборка 1172
Const
n=4;
Var
ar:array[1..n] of integer;
i,j:integer;
k:real;
begin
writeln('Array:');
for i:=1 to n do
readln(ar[i]);
k:=ar[1]/ar[2];
for i:=1 to n-1 do
if ar[i]/ar[i+1]<>k then
begin
writeln('No');
exit;
end;
writeln('Yup');
end.
Пример ввода:
1
2
4
8
Пример вывода:
Yup
Пятиразрядное шестнадцатиричное число соответствует 5×4=20-разрядному двоичному.
Блок из пяти смежных единиц можно разместить 16=2⁴ разными способами, получая числа
0000 ... 0000 0001 1111₂
0000 ... 0000 0011 1110₂
...
1111 1000 ... 0000 0000₂
Всего же при помощи 20 разрядов можно получить 2²⁰ чисел.
Тогда искомый шанс составит 2⁴⁻²⁰ = 2⁻¹⁶
А количество информации будет равно 16 битам.
Ответ: 16