Вообще-то надо брать log(по основанию 2 заданного числа) и округлять до большего целого. Но проще смотреть на степени числа 2:
а) 2^6=64<65, значит надо 7 бит
б) 2^8=256 -8 бит (ровно)
в) 2^15=32768 -15 бит
г) 2^12=4096>4095 12бит достаточно
д) 2^16=65536 -16 бит
е) 2^21=2097152 мало, значит надо 22 бита
Var a,n: integer;
begin write('Введите a: ');
readln(a);
n:=352346543;
writeln(a,n,a);
<span>end.</span>
Ошибка в написании формулы, в зависимости от того, что ты делала
1б.2в.3в как то так вот это ответ