Спросить у пользователя число в десятичном виде от 0 до 254. Вывести это число в двоичном виде, в виде восьми бит. Могут быть выведены незначащие нули. Пример: 253 Ответ: 11111101
36
ОТВЕТЫ
Var a,b:integer; s:string;beginreadln(a);if (agt;=0) and (alt;=254) thenbeginb:=8;while true dobegins:=a mod 2+s;a:=a div 2;if b=1 then break;b:=b-1;end;endelsewriteln(Число не находится в промежутке от 0 до 254);writeln(Двоичное число: ,s);end.
123
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Валентин
Алгоритм замены буквы рисунком ...
2019-05-24 09:37:21
Бутримов
КТО-НИБУДЬ HELP.ЕСТЬ ТАКИЕ КТО СПОСОБЕН???!!!.....(блок схему в программу pascal ...
2019-05-24 09:35:20
Shol
Одна компания выпустила лотерейные билеты трёх разрядов: для молодежи, ...
2019-05-24 09:34:24
Manalv
10БАЛЛОВ!Легкое задание №10 ...
2019-05-24 09:28:06