Сделать программу не использую функцию hex$(n)

@SKim961 · Регистрация: 10.01.2012

Author24 — интернет-сервис помощи студентам

PureBasic

CLS
n as single
z as string
input n
z=hex$(n)
print z

это сама программа... не могу сделать ее без использования встроенной функции... Заранее спасибо)

@m-ch · 11.01.2012, 09:21

PureBasic

CLS
DIM n AS LONG, h AS INTEGER
DIM z AS STRING
 
INPUT n
DO
  h = n MOD 16
  z = CHR$(48 + h - (h > 9) * 7) + z
  n = n \ 16
LOOP WHILE n > 0
PRINT z

	11.01.2012, 09:21