Var c:integer;
begin
write('Введите с: ');
readln(c);
c:=c+c;
writeln('c = ',c);
end.
Пример:
Введите с: 16
c = 32
На фото номер 17
а)110111
б)10100
в)1110007
номер 16
512=2^9 1000=2^3 *125 512000=2^12 *125 6=2*3
Размер файла = (2^12 * 125 * 2 * 3 ) бит =(2^10 * 375) байт =375 Кбайт
Ответ 375 Кбайт
найдем количество информации в одном символе. Оно равно 7 бит
(x не принадлежит P) v (x принадлежит Q) v (x не принадлежит A) v (x принадлежит R) как любезно упростил preceptor
в коментариях
т.е. чтоб выражение было истинным, то достаточно чтоб хоть одно выражение в скобочках было истинным
Менять мы можем только А, то есть нужно добитьсяя истиности для (x не принадлежит A) при любом х
а это А = пустое множество