Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
makon3
07.05.2022 23:15 •
Информатика
Вводится целое положительное число. перевести его в двоичную систему счисления. вывести результат в 2 с.с. это паскаль!
Показать ответ
Ответ:
akame505
02.10.2020 09:14
Var
n,n1:longint;
s:string;
begin
Write('Введите натуральное число: '); Readln(n);
s := ''; n1:=n;
while n > 0 do
begin
if Odd(n) then s:='1'+s else s:='0'+s;
n := n div 2
end;
Writeln(n1,'(10)=',s,'(2)')
end.
Тестовое решение:
Введите натуральное число: 349
349(10)=101011101(2)
0,0
(0 оценок)
Популярные вопросы: Информатика
cooldown229
21.10.2022 14:54
Напишите код решения программ в обработчике e97...
werasdfghjfdfd
10.09.2020 06:30
Найти количество путей от а до к...
Crazyyouandme
16.07.2021 16:47
40 до ! составить фрагмент программы,который выводит элементы массива(данные) на экран.пример ввода массива с клавиатуры: rem- ввод элементов массива с клавиатуры dim a(5)for...
lol756
17.08.2020 10:34
6. які існують орієнтації сторінок? 7. як вставити формулу до текстового документа? 8. як об єднати кілька клітинок таблиці в одну? 9. як у документі створити кілька розділів?...
sdfsdfsddf
16.12.2021 22:07
1. заполнить матрицу из 8 строк и 5 столбцов случайными числами в интервале [-10,10] выведите ее на экран. 2. устроить все элементы матрицы и вывести ее на экран. 3.найти минимальный...
olegl123
21.12.2022 19:34
запишите значение переменной a после выполнения фрагмента алгоритма....
semenkrut123
21.09.2022 16:35
Как определить сколько раз будет выполняться тело цикла? 1) s: =0; i: =0 repeat i: =i-1 ; s: =s+1/i until i =1 ; 2) s: =0; i: =0 repeat i: =i+1 ; until i 2; s=a+1/i;...
Сашулёноксовёнок
06.09.2022 01:53
1. укажите основные группы по 2. назовите основные функции ос программное обеспечение пример операционная система архиватор антивирусная программа коммуникационная программа система...
huxgehd
09.03.2023 14:58
Некоторое число в двоичной системе счисления записывается как 10011010. запишите это число в десятичной системе счисления....
leomax2
09.03.2023 14:58
Какую роль в информационной деятельности человека выполняют органы чувств? перечислите все органы чувств?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n,n1:longint;
s:string;
begin
Write('Введите натуральное число: '); Readln(n);
s := ''; n1:=n;
while n > 0 do
begin
if Odd(n) then s:='1'+s else s:='0'+s;
n := n div 2
end;
Writeln(n1,'(10)=',s,'(2)')
end.
Тестовое решение:
Введите натуральное число: 349
349(10)=101011101(2)