9класс
Страница 29-30 параграф 1.2 вопрос 4, ГДЗ по информатике за 9 класс к учебнику Босовой за 2023 год Просвещение
Номер 4. Напишите функцию kbdn, которая вычисляет количество цифр в двоичной записи вводимого десятичного числа.
program Z_1_2_4;
var
n: integer;
function kbdn(a: integer): integer;
var
k: integer;
begin
k := 0;
while a <> 0 do
begin
inc(k);
a := a div 2
end;
kbdn := k
end;
begin
write('ВВеди число n>>');
readln(n);
writeln('Количество цифр в двоичной записи числа ',n,' = ', kbdn(n))
end.
