Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
marinapizdec
22.12.2020 22:26 •
Информатика
Много . надо.дано: а=70 в 10,b=40 в 10.какое из чисел с,записанных в двоичной системе,отвечает условию b
Показать ответ
Ответ:
митгпош
25.08.2020 01:57
Var c,i:integer;
function IntToBin2(Value: integer): string;
var i: integer;
begin
Result:= '';
for i:= 0 to Trunc(Ln(Value)/Ln(2)) do
Result:= IntToStr((Value and (1 shl i) shr i))+Result;
end;
begin;
for c:=41 to 69 do
writeln(c,'=',IntToBin2(c));
end.
Вывод:
41=101001
42=101010
43=101011
44=101100
45=101101
46=101110
47=101111
48=110000
49=110001
50=110010
51=110011
52=110100
53=110101
54=110110
55=110111
56=111000
57=111001
58=111010
59=111011
60=111100
61=111101
62=111110
63=111111
64=1000000
65=1000001
66=1000010
67=1000011
68=1000100
69=1000101
0,0
(0 оценок)
Популярные вопросы: Информатика
MmVl
22.05.2023 03:00
1)дана сторона квадрата а. найти p= 4*a...
milka293
11.12.2021 15:50
Составить алгоритм решения с алгоритмического языка псевдокода и с блок-схем, используя конструкцию циклического алгоритма требуется найти сумму чисел, кратных 7, в диапазоне...
Стаилз2002
16.03.2021 13:30
Даны координаты трех вершин треугольника : (х1, у1 ), (х2, у2) , (х3, у3) . найти его периметр и площадь, используя формулу для расстояния между двумя точками на плоскости...
Negumanitariy
16.03.2021 13:30
По информатике надо сделать анимацию летящего самолёта с которого ядра в graphabc...
MaxKryaks
29.12.2022 01:32
Если числа в двоичной системе счисления имеют вид 11001(2) и 1010(2), то их сумма в двоичной системе счисления равна...
Popova23101977
25.10.2021 22:36
Переведите в машинный двоичный код, значения, заданные шестнадцатеричным кодом, переведите полученные значения в восьмеричный код 5а07= 7894= 1234= fe34= 8901=...
дарья1643
17.03.2023 09:35
Инициировать действие над объектом или узнать его свойства можно через -панель -контекстное меню -рабочий стол -пиктограмму -кнопку пуск...
alena536
16.06.2021 21:14
Для регистрации на сайте некоторой страны пользователю необходимо придумать пароль длиной ровно 11 символов. в пароле можно использовать десятичные цифры и 32 различных символа...
IgroNUB
22.08.2021 10:39
Вы учитесь в политехническом университете. сколько информации содержит сообщение о том, что вы учитесь на первом курсе? подробней !...
дияр22
09.02.2020 00:32
Автоматическое устройство осуществило перекодировку информационного сообщения на языке, первоначально записанного в кои-8 в unicode. какова длина нового сообщения в байтах,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
function IntToBin2(Value: integer): string;
var i: integer;
begin
Result:= '';
for i:= 0 to Trunc(Ln(Value)/Ln(2)) do
Result:= IntToStr((Value and (1 shl i) shr i))+Result;
end;
begin;
for c:=41 to 69 do
writeln(c,'=',IntToBin2(c));
end.
Вывод:
41=101001
42=101010
43=101011
44=101100
45=101101
46=101110
47=101111
48=110000
49=110001
50=110010
51=110011
52=110100
53=110101
54=110110
55=110111
56=111000
57=111001
58=111010
59=111011
60=111100
61=111101
62=111110
63=111111
64=1000000
65=1000001
66=1000010
67=1000011
68=1000100
69=1000101