Question

Спросить у пользователя число в десятичном виде от 0 до 254. Вывести это число в двоичном виде, в виде восьми бит. Могут быть выведены незначащие нули. Пример: 253 Ответ: 11111101

Answer 1

Var a,b:integer;    s:string;beginreadln(a);if (a>=0) and (a<=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.

Answer 2

Конечно! Я могу помочь вам с этим. Пожалуйста, укажите число в десятичном виде от 0 до 254, а я выведу его в двоичном виде, представленном восьью битами.

Введите число: