61/2=30 (остаток 1)30/2=15 (остаток 0)15/2=7 (остаток 1)7/2=3 (остаток 1)3/2=1 (остаток 1)1/2=0 (остаток 1)Записываем остатки в обратном порядке, это и будет ответ111101
61/8=7 (остаток 5)7/8=0 (остаток 7)Записываем остатки в обратном порядке, это и будет ответ75
61/16=3 (остаток 13)3/16=0 (остаток 3)Записываем остатки в обратном порядке, это и будет ответ3D
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
if (ReadReal('введите возраст:')<18) then write('несовершеннолетний') else write('совершеннолетний');
end.
"""""""""""""""""""Г о м е р п о э м ы"""""""""""""""""""""(простите что так)
Обьяснение:
В памяти компьютера информация представлена в (подстовляем)двоичном коде в виде цепочек (подстовляем)
нулей и едениц
Удачи с Сочем