Ответы на вопрос:
ответ:
вот
объяснение:
const cf: string[16]='0123456789abcdef'; //цифры в сс 16
tt: array[1..16] of string[4]= ('','0001','0010','0011', //тетрады в сс16
'0100','0101','0110','0111',
'1000','1001','1010','1011',
'1100','1101','1110','');
var s16,s2,s: string;
f: boolean;
i,j: byte;
begin
repeat
writeln('введите число в сс 16');
readln(s16);
s16: =uppercase(s16); //переводим в верхний регистр
if s16[1]='-' then i: =2 else i: =1;
while(i< =length(s16))and(pos(s16[i],cf)> 0) do inc(i);
if i< =length(s16) then writeln('число введено неверно, повторите');
until i> length(s16);
f: =s16[1]='-'; //отрицательное
s2: =''; //переводим в сс 2
if f then delete(s16,1,1);
for i: =1 to length(s16) do
s2: =s2+tt[pos(s16[i],cf)];
if f then s2: ='-'+s2;
writeln('число в сс 2=',s2)
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Orlolo06.04.2022 03:30
-
dzhuliya42355555555511.06.2023 12:01
-
aasybas08.05.2022 16:21
-
Леееера110.08.2021 19:52
-
chiastr08.12.2021 17:24
-
UmnikBest24.03.2021 11:57
-
Dmitry7019.06.2023 05:52
-
Angelaby26.06.2021 11:07
-
KatyushaLis7722.03.2023 05:45
-
Leola128.05.2023 15:32
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.