Вопрос по информатике:
Помогите написать программу, которая выводит шестнадцатеричное представление введенного с клавиатуры двоичного числа.
для Delphi нужен код программы от начала до конца
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 05.01.2018 19:27
- Информатика
- remove_red_eye 6223
- thumb_up 21
Ответы и объяснения 1
uses
SysUtils;
Var
C:string;
i:integer;
begin
Read(C);
if Length(C) mod 4 0 then
For i:= 1 to 4-Length(C) mod 4 do
C:='0'+C;
For i:= 1 to Length(C) div 4 do
Case StrToInt(C[4*i-3]+C[4*i-2]+C[4*i-1]+C[4*i]) of
0000:Write(0);
0001:Write(1);
0010:Write(2);
0011:Write(3);
0100:Write(4);
0101:Write(5);
0110:Write(6);
0111:Write(7);
1000:Write(8);
1001:Write(9);
1010:Write('A');
1011:Write('B');
1100:Write('C');
1101:Write('D');
1110:Write('E');
1111:Write('F');
End;
ReadLn;
end.
- 06.01.2018 13:28
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.