Question

Напишите программу, которая переводит переданное её целое число (возможно, отрицательное) в шестнадцатеричный код. Используйте процедуру. входные данные 255 выходные данные FF

Answer 1

ОТДЕЛ Задание+;

ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;

ПЕР
  число: ЦЕЛ;
  шестн: РЯД 32 ИЗ ЗНАК;
  сч: ЦЕЛ;
  зн: ЗНАК;

ЗАДАЧА ШестнЦифра(цифра: ЦЕЛ): ЗНАК;
УКАЗ
  ЕСЛИ цифра < 10 ТО ВОЗВРАТ ВЗНАК(ВЦЕЛ("0") + цифра)
  ИНАЧЕ ВОЗВРАТ ВЗНАК(ВЦЕЛ("A") - 10 + цифра) КОН
КОН ШестнЦифра;

УКАЗ
  число := Приём.Число();
  шестн := "";
  Вывод.Цепь("^");

  ПОКА число > 0 ВЫП
    шестн[ДЛИНА(шестн) + 1] = 0X;
    шестн[ДЛИНА(шестн)] = ШестнЦифра(число ОСТАТОК 16);
    число := число ДЕЛИТЬ 16
  КОН;

  ОТ сч := 0 ДО ДЛИНА(шестн) - 1 ВЫП
    зн := шестн[сч];
    шестн[сч] := шестн[ДЛИНА(шестн) - 1 - сч];
    шестн[ДЛИНА(шестн) - 1 - сч] := зн
  КОН;

  Вывод.Цепь(шестн)

КОН Задание.

Answer 2

Вот пример программы на языке Python, которая принимает целое число и выводит его шестнадцатеричное представление:

pythonCopy code
def to_hexadecimal(number):
    # Проверяем, является ли число отрицательным
    is_negative = False
    if number < 0:
        is_negative = True
        number = abs(number)
    
    # Преобразуем число в шестнадцатеричную строку
    hexadecimal = hex(number)[2:].upper()
    
    # Добавляем знак минуса для отрицательных чисел
    if is_negative:
        hexadecimal = '-' + hexadecimal
    
    return hexadecimal

# Тестирование программы
number = int(input("Введите целое число: "))
hexadecimal = to_hexadecimal(number)
print("Шестнадцатеричное представление:", hexadecimal)

Пример использования:

Copy code
Введите целое число: 255
Шестнадцатеричное представление: FF

Примечания:

1. Программа использует встроенную функцию hex(), которая преобразует число в шестнадцатеричную строку.
2. Функция hex() возвращает строку, начинающуюся с префикса "0x", поэтому мы используем срез [2:], чтобы удалить этот префикс.
3. В данной программе предполагается, что пользователь вводит целое число с клавиатуры.