16 진 카운터


10

카운터가있는 16 진 변환 표 이미지

16 진법 은에서 16 진법 으로 계산 0됩니다 f. 당신의 임무는 이러한 숫자를 표시하는 카운터를 만드는 것입니다.

예:

$ python counter.py
1 2 3 4 5 6 7 8 9 a b c d e f 10 11 12 13 14 15 16 17 18 19 1a 1b 1c 1d 1e 1f 20 21 22 23 24 25 26 27 28 29 2a 2b 2c 2d 2e 2f 30

규칙 :

  • 숫자는 공백, 탭 또는 줄 바꿈으로 구분할 수 있습니다.
  • 당신이 가야하는 최소 숫자는 30(십진수 48)입니다.
    • 프로그램이 멈출 때까지 숫자를 영원히 인쇄하도록 할 수도 있습니다.
  • 문자는 대문자 또는 소문자 ( A또는 a) 일 수 있습니다.
  • 내장 함수는 허용되지 않습니다 (16 진 변환 / 카운팅에 직접 영향을 미침).
  • 선행 0이 허용됩니다
  • 그것은에서 시작할 수 있습니다 1또는0
  • 최단 코드 승리!

@ Sp3000 내장 된 방법은 무엇입니까? 10 진수를 16 진수로 변환 하시겠습니까?
Phase

@ Sp3000 내장 된 기능이 없습니다!
Phase

4
그렇다면 일반적인 기본 변환 함수는 어떻습니까?
Sp3000

1
@ Sp3000 Sure (이것을 무시하고 15 자 제한)
Phase

1
@Mauris 예! 확실히 흥미로울 것입니다 ...
Phase

답변:


5

Pyth-12 바이트

직교 곱을 사용하고 끝에 올바른 순서로 정렬 한 다음 공백으로 결합합니다. 00-ff포함하여 인쇄 합니다.

jdS^s+<G6UT2

여기에서 온라인으로 사용해보십시오 .

jd             Join by spaces
 S             Sort lexiographically
  ^    2       Cartesian product repeat twice
   s+          Append then concatenate entire list
    <G6        First six of alphabet
    UT         Range 0-9


6

CJam, 21 14 바이트

A,_6,'Af++m*S*

00 ~ 9F의 숫자를 인쇄합니다.

CJam 통역사 에서 온라인으로 사용해보십시오 .

작동 원리

A,             e# Push [0 ... 9].
  _            e# Push a copy.
   6,          e# Push [0 ... 5].
     'Af+      e# Add 'A' to each. This pushes "ABCDEF".
         +     e# Concatenate. This pushes [0 ... 9 'A' ... 'F'].
          m*   e# Cartesian product. This pushes [[0 0] ... [9 'F'].
            S* e# Join, separating by spaces.

5

파이썬 2, 52

a=0
for b in'0123456789ABCDEF'*4:print`a`+b;a+=b>'E'

로 인쇄 00합니다 3F. 첫 번째 숫자 a가 항상이 범위의 숫자라는 사실을 이용합니다 . 두 번째 자릿수의 네 사이클을 반복 하여 두 번째 자릿수가있을 때마다 b증가 a합니다 F.

이것은 직접보다 짧은 하나의 문자입니다

for a in'0123':
 for b in'0123456789ABCDEF':print a+b

n ='0123'일부 문자를 저장해야합니다
Caridorc

@Caridorc 정확히 어떻게?
xnor

작성thing in n + restofstring
Caridorc

@Caricord 무슨 뜻인지 잘 모르겠습니다.n='0123' for a in n: for b in n+'456789ABCDEF':print a+b
xnor

2
@Caridorc 내가 사용하는 금속 지름길은 가변 비용으로 4자를 절약하므로 보상하기 위해 4 자 이상을 절약해야하므로 0123다른 것을 위해 4자를 절약하는 것만으로는 충분하지 않습니다.
xnor

5

자바 스크립트 (ES6), 57 바이트

내가 생각하는 파이썬과 같은 접근법.

for(i of c='0123456789ABCDEF')for(j of c)console.log(i+j)

4

TI 기본, 63 바이트

:For(I,0,4,16⁻¹
:Disp sub(" 0123456789ABCDEF",1+16fPart(I),2
:Output(7,1,int(I
:End

내 계산기의 메모리 관리 화면 TI-84 +에 따르면 63 바이트입니다. 부분적으로 채워진 홈 화면으로 프로그램을 시작하십시오!


코드 길이에서 9 바이트 헤더의 길이와 프로그램 이름을 빼는 것을 기억 했습니까?
lirtosiast

4

Befunge-93, 57 바이트

<_v#-*44:+1,*84,g2:\,g2:\
^ >$1+:9-!#@_0
0123456789ABCDEF

에서 00까지 숫자를 인쇄합니다 8F. 프로그램이 영원히 실행되는 것을 선호하는 경우 아래 버전은 종료되지 않으며에서 00까지 모든 숫자를 계속 출력합니다 FF.

<_v#-*44:+1,*84,g2:\,g2:\
^ >$1+:35*`!*0
0123456789ABCDEF

<_v # -f : +1, ', g2 : \, g2 : \를 사용하여 -98에 몇 바이트를 저장할 수 있습니다. 그 이상으로 많은 개선을 볼 수 없습니다.
Jacob

0123456789ABCDEF01g::88+/2-0g,88+%0g,9,1+01p
Lynn

44 바이트입니다. 두 번째 솔루션처럼 영원히 반복되며 두 번째 1F를 지나서 잘못된 결과를 인쇄합니다. bef.c알 수없는 명령 ( ABCDEF) 을 자동으로 무시 하는 구현 (예 : 참조 구현 ) 이 필요합니다 .
Lynn

(OP는 솔루션 30이 타격을당한 과거의 어딘가에서 "깨질"다고 언급했다. 이것은 스택에 서서히 오버 플로우 될 것이기 때문에 종료 시점이 있다고 가정한다. 또한 출력은 탭으로 분리된다. ) 오, 사용하는 Befunge 구현은 전체 80x25 원환 체를 공백으로 초기화해야합니다 (ASCII 0x20).
Lynn

@Mauris 전체 토러스를 공백으로 인스턴스화 해야하는 구현에 대한 귀하의 의견과 관련하여 제시된 코드의 바이트 수에 영향을 줍니까? 모서리로 공백을 채우는 대신 필요한 문자 만 계산했습니다.
Sok

2

C, 78 75 바이트

x(y){return y+48+y/10*7;}f(j){for(j=0;printf("%c%c ",x(j/16),x(15&j++)););}

f()인자없이 호출 할 함수 와 헬퍼 함수를 ​​정의 x(int)합니다. 이에 깨집니다 FF.

놀랍게도 이것은 명백한 것보다 1 바이트 짧습니다.

char*s="0123456789ABCDEF";h(j){for(j=0;printf("%c%c ",s[j/16],s[15&j++]););}

경고 : 디버그 환경 외부에서이 코드를 실행하지 않는 것이 좋습니다 ...

테스트 :

int main(int argc, char** argv) {
    f();
    return 0;
}

산출:

00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F 10 11 12 13 14 15 16 17 18 19 1A 1B 1C 1D 1E 1F 20 21 22 23 24 25 26 27 28 29 2A 2B 2C 2D 2E 2F 30 31 32 33 34 35 36 (...)

물론이 34 바이트 함수는보다 강력한 (및 치트) 접근 방식입니다.

g(i){for(i=0;printf("%x ",i++););}

1
이것을 시도하기 시작했지만 내 대답은 너무 비슷했습니다. 첫 번째 % c를 % d (으)로 만들고 함수를 생략하면 몇 바이트를 절약 할 수 있습니다. 그래도 9F까지만 유효합니다.
Alchymist

return y+가능할 수도 있습니다 y+=.
Jonathan Frech

2

Pyth, 17 바이트

VJs++kUT<G6FYJ+NY

여기 사용해보십시오

작동 방식 :

         <G6         # "abcdef"
       UT            # [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
      k              # an empty string (so + means concatenation, not addition)
   s++               # join them all ("0123456789abcdef")
  J                  # call this J
 V                   # for each N in J...
            FYJ      # for each Y in J...
               +NY   # print N and Y

jb^+jkUT<G6 2Cartesian 제품을 사용하여 동일한 작업을 수행하고 여전히 골프를 할 수있는 것 같습니다 ...
FryAmTheEggman

2

자바 스크립트 ES6, 67 62 바이트

(x=''.replace.bind('0123456789ABCDEF',/./g))(n=>x(o=>' '+n+o))

2

J, 22 바이트

>{;~'0123456789abcdef'

에 센다 ff. 다음 0x10과 같이 각 숫자 블록 사이에 추가 줄 바꿈을 인쇄합니다 .

...
0d
0e
0f

10
11
...

2

볼거리-65 바이트

S Q="0123456789ABCDEF" F I=1:1:16 F J=1:1:16 W $E(Q,I),$E(Q,J),!

아뇨 ... 유행성 이하선염은 아직 죽지 않았습니다! :-)


2

CJam, 22 바이트

1{_GbA,6,'af++f=oNo)}h

이것은 영원히 실행되므로 영구 링크를 포함 하지 않는 것이 좋은 경우는 거의 없습니다 .


oNonTIO 와 동일 합니다.
Esolanging 과일

2

C64Mini 및 Commodore BASIC (C64 / 128, PET, VIC-20, C16 / + 4)-164 기본 및 토큰 화 된 바이트 사용

 0 fOd=.to255:n=d:fOi=1to.stE-1:h%(i)=n/(16^i):n=n-(h%(i)*(16^i)):nEi:h$=""
 1 fOi=1to.stE-1:ifh%(i)<10tHh$=h$+cH(48+h%(i))
 2 ifh%(i)>9tHh$=h$+cH(55+h%(i))
 3 nEi:?h$"  ";:nEd

16 진수 다음에 공백 두 개를 인쇄하여 40/80 열과 VIC-20의 22 열에 잘 맞도록 인쇄합니다.

코모도어 플러스 / 4 헥스 카운터 이니 트


2

brainfuck , 2902 바이트

아웃 고프하기는 쉽지만 샷을 줄 가치가 있습니다.

+>+[<[>>+>+<<<-]>>[<<+>>-]>[[-]>>>>>[-]++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++<<<[-]++++++++++++++++++++++++++++++++++++++++++++++++>[-]<[>+<<+>-]<[>+<-]<]>+<<+<<[>>->+<<<-]>>>[<<<+>>>-]<[->+<<[>>>-<<+<-]>[<+>-]>>[<->[-]]<[<<<+>>>-]<]>>[-]<<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>.>.>>>++++++++++++++++++++++++++++++++.[-]<<[-]<<[>>+<<<+>-]<[>+<-]>>>>>+++++++++++++++++++++++++++++++++++++++++++++++++++++++++<<[<<<<+>>>>-]+>>[<<<<<<-<+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>[>>>>-<<<<[-]]>>>>>>[-]++<<[<<<<<+>+>>>>-]<<<<<[>>>>>+<<<<<-]>[<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>[-]]>>>>>>[-]<<<<<<]<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>>>[-]<[>+<<<+>>-]<<[>>+<<-]>>>>>+++++++++++++++++++++++++++++++++++++++++++++++++++++++++<<[<<<<+>>>>-]+>>[<<<<<<-<+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>[>>>>-<<<<[-]]>>>>>>[-]+++<<[<<<<<+>+>>>>-]<<<<<[>>>>>+<<<<<-]>[<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>[-]]>>>>>>[-]<<<<<<]<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>>>[-]<<[>>+<<<+>-]<[>+<-]>>>[<<<<+>>>>-]+>[<<<<<-<+>>>>>>-]<<<<<<[>>>>>>+<<<<<<-]>[>>>>-<<<<[-]]>>>>>>+++++<<[<<<<<+>+>>>>-]<<<<<[>>>>>+<<<<<-]>[<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>[-]]>>>>>>[-]<<<<<<]>++++++<<+<<[>>->+<<<-]>>>[<<<+>>>-]<[->+<<[>>>-<<+<-]>[<+>-]>>[<->[-]]<[<<<+>>>-]<]>>[-]<<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>>>[-]<[>+<<<+>>-]<<[>>+<<-]>>>[<<<<+>>>>-]+>[<<<<<-<+>>>>>>-]<<<<<<[>>>>>>+<<<<<<-]>[>>>>-<<<<[-]]>>>>>>++++<<[<<<<<+>+>>>>-]<<<<<[>>>>>+<<<<<-]>[<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>[-]]>>>>>>[-]<<<<<<]<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>>+>>>+<<<<<<<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>>>>>>>[-]<<<<<<]>++<<+<<[>>->+<<<-]>>>[<<<+>>>-]<[->+<<[>>>-<<+<-]>[<+>-]>>[<->[-]]<[<<<+>>>-]<]>>[-]<<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>>>>-----<<<[-]>>>[<<<+<+>>>>-]<<<<[>>>>+<<<<-]>>>>+++++>+<<<<<<<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>>>>>>>[-]<<<<<<]>+++<<+<<[>>->+<<<-]>>>[<<<+>>>-]<[->+<<[>>>-<<+<-]>[<+>-]>>[<->[-]]<[<<<+>>>-]<]>>[-]<<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>>>>-----<<[-]>>[<<+<<+>>>>-]<<<<[>>>>+<<<<-]>>>>+++++>+<<<<<<<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>>>>>>>[-]<<<<<<]>++++<<+<<[>>->+<<<-]>>>[<<<+>>>-]<[->+<<[>>>-<<+<-]>[<+>-]>>[<->[-]]<[<<<+>>>-]<]>>[-]<<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>+>[-]++++++++++++++++++++++++++++++++++++++++++++++++>>>+<<<<<<<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>>>>>>>[-]<<<<<<]>+++++<<+<<[>>->+<<<-]>>>[<<<+>>>-]<[->+<<[>>>-<<+<-]>[<+>-]>>[<->[-]]<[<<<+>>>-]<]>>[-]<<<<[>>+>+<<<-]>>[<<+>>-]>[[-]>>>>[-]<[>+<<<+>>-]<<[>>+<<-]>>>[<<<<+>>>>-]+>[<<<<<-<+>>>>>>-]<<<<<<[>>>>>>+<<<<<<-]>[>>>>-<<<<[-]]>>>>>>++++++<<<<<<+>>>>[<<<<[-]<+>>>>>-]<<<<<[>>>>>+<<<<<-]>[<<<[-]>[-]>>>>>>>>[<<<<<<<<+>+>>>>>>>-]<<<<<<<[>>>>>>>+<<<<<<<-]>[-]]>>>>>>[-]<<<<<<]<<<[>>+>+<<<-]>>[<<+>>-]>[[-]<<<[-]>[-]>>]<<]

온라인으로 사용해보십시오!


문자를 생성 한 0-F다음 인쇄를 하드 코딩 한 경우 더 짧습니다 . 어떻게 그렇게 오래 만들었습니까?
조 왕

@ JoKing 가능하지만 난 그냥 재미를 갖고 싶어
Krzysztof Szewczyk

그 의견은이 답변이 도전의 승리 기준에 대한 심각한 경쟁자가 아니라는 인정이 아닙니까?
pppery

1

파이썬 2, 66 55 바이트

이것은 정말로 나에게 가장 명백한 접근 방법이었을 것입니다 ..

a='0123456789ABCDEF'
for x in a:
 for y in a:print x+y

Old (66 Bytes) : 기술적으로이 후에 오류가 발생 FF하지만에 도달 30합니다.

n=1;a='0123456789ABCDEF'
while 1:print a[n/16]*(n>15)+a[n%16];n+=1

문자열 변환이 기본 변환을 거칠 것이기 때문에 허용되지 않는다고 가정했지만 허용 된 경우 29 바이트입니다.

n=1
while 1:print"%x"%n;n+=1

1

자바, 104 바이트

char t[]="0123456789abcdef".toCharArray(),i;void f(){for(;i<99;)System.out.println(""+t[i/16]+t[i++%16]);}

i<99제거하면 여전히 30에 도달하지만 결국 충돌합니다. 그게 맞는지 잘 모르겠습니다.


1

J, 47 바이트

'0123456789abcdef'{~([:|:2 256$(]#i.),256$i.)16

00에서 ff까지 인쇄


1
훨씬 짧은 방법 :>{;~'0123456789abcdef'
Lynn

와우, 그것은 매우 좋다! 그러나 왜 답변으로 게시하지 않았습니까? 단지 22 바이트입니다!
gar

1

자바 스크립트 74 72 65 60

//for(i=0,a="0123456789ABCDEF";i++<49;)console.log(a[i>>4]+a[i%16])
for(i=0;i++<48;)console.log((i>>4)+"0123456789ABCDEF"[i%16])


1

펄 6 , 34 바이트

어떤 종류의 변환도 사용하지 않는 가장 짧은 방법은 다음과 같습니다.

put [X~] (|(0..9),|('A'..'F'))xx 2 # 34 bytes

인쇄 00... FF공간이 순서대로 분리됩니다.
더 많이 원한다면 더 2큰 숫자로 바꿀 수 있습니다.
(출력하기 전에 값을 함께 연결하므로 4보다 큰 숫자를 사용하지 마십시오. 따라서 상당한 양의 RAM 사용)


16 진수 값을 쓰지 않는 가장 짧은

put [R~] (|(0..9),|('A'..'F'))[.polymod: 16 xx*]for 0..* # 56 bytes

printf허용 된 경우

printf "%X ",$_ for 0..* # 24 bytes

기본 변환 기능이 허용 된 경우

put .base(16)for 0..* # 21 bytes

1

C ++ 14-135

#include<string>
#include<iostream>
void f(){std::string a="0123",b="0123456789ABCDEF";for(char c:a)for(char d:b)std::cout<<c<<d<<" ";}

아뇨, 괜찮아요 어떤 컴파일러를 사용하고 있습니까? 나는 'string' is not a member of 'std'내 것을 얻는다 .
Dennis

@Dennis 좋은 지적입니다. 나는 항상 자체 문자열을 포함해야한다는 것을 잊습니다. 결정된.
Yytsi

1. 같은 오류가 발생 cout합니다. 나도 당신이 필요 iostream하다고 생각합니다 . 2. 분리하지 않고 숫자를 인쇄합니다. 과제는 공백, 탭 또는 줄 바꿈이 필요합니다. 3. 필요한 C ++ 버전을 언급해야합니다.
Dennis

1

jq 1.5 : 65 59 자

(56 자 코드 + 3 자 명령 행 옵션)

[range(10)]+"a b c d e f"/" "|{a:.[],b:.}|"\(.a)\(.b[])"

샘플 실행 :

bash-4.3$ jq -n -r '[range(10)]+"a b c d e f"/" "|{a:.[],b:.}|"\(.a)\(.b[])"' | head
00
01
02
03
04
05
06
07
08
09

온라인 테스트 (전달 -rURL을 통해 지원되지 않습니다 - 자신을 원시 출력을 확인합니다.)

jq 1.5 : 56 자

(53 자 코드 + 3 자 명령 행 옵션)

[[range(10)]+"a b c d e f"/" "|"\(.[])\(.[])"]|sort[]

이것은 올바른 출력을 생성하지만 정확히 카운터는 아닙니다. 값을 순서대로 생성하지 않고 정렬합니다.

온라인 테스트 (전달 -rURL을 통해 지원되지 않습니다 - 자신을 원시 출력을 확인합니다.)


jq에 대한 링크가 작동하지 않으며 수정했을 때 github에 색인 파일이 없다고 말합니다 : P
phase

죄송합니다. @Phase 감사합니다. 나는 문자 수에 너무 집중했다.
manatwork

1

Dyalog APL , 12 바이트

       ∘.,⍨16↑⎕D,⎕A
 00  01  02  03  04  05  06  07  08  09  0A  0B  0C  0D  0E  0F 
 10  11  12  13  14  15  16  17  18  19  1A  1B  1C  1D  1E  1F 
 20  21  22  23  24  25  26  27  28  29  2A  2B  2C  2D  2E  2F 
 30  31  32  33  34  35  36  37  38  39  3A  3B  3C  3D  3E  3F 
 40  41  42  43  44  45  46  47  48  49  4A  4B  4C  4D  4E  4F 
 50  51  52  53  54  55  56  57  58  59  5A  5B  5C  5D  5E  5F 
 60  61  62  63  64  65  66  67  68  69  6A  6B  6C  6D  6E  6F 
 70  71  72  73  74  75  76  77  78  79  7A  7B  7C  7D  7E  7F 
 80  81  82  83  84  85  86  87  88  89  8A  8B  8C  8D  8E  8F 
 90  91  92  93  94  95  96  97  98  99  9A  9B  9C  9D  9E  9F 
 A0  A1  A2  A3  A4  A5  A6  A7  A8  A9  AA  AB  AC  AD  AE  AF 
 B0  B1  B2  B3  B4  B5  B6  B7  B8  B9  BA  BB  BC  BD  BE  BF 
 C0  C1  C2  C3  C4  C5  C6  C7  C8  C9  CA  CB  CC  CD  CE  CF 
 D0  D1  D2  D3  D4  D5  D6  D7  D8  D9  DA  DB  DC  DD  DE  DF 
 E0  E1  E2  E3  E4  E5  E6  E7  E8  E9  EA  EB  EC  ED  EE  EF 
 F0  F1  F2  F3  F4  F5  F6  F7  F8  F9  FA  FB  FC  FD  FE  FF 

한 번, APL은 Pyth와 일치합니다.
Adám

1

Malbolge , 900 바이트

개선하려면 ...

D'``@"\7}|X9E1gwuR21=p(:9%IZYEg}eA/ya>O_)([Zvotm3qponmfN+Lbg`ed]\"CB^W\Uy<;WVONSLp3ONMLEDhH*)?>b%A@?87[;:9876/S3,P0/.-&J$)"'~D|{"y?}|utyr8potmrqpi/mfN+Lbg`e^$bDZ_^]VzZSXQVUTSLp3ONMLEDhH*)EDCB;@?8\6|:32V6v.32+O)o'&J*)i'&%|Bcb~w|u;yxwvutVrkj0nmfN+iKg`_%cE[`Y}@V[ZYXWPtT6LKJImM/KJIBAe(D=<A:98\[;{32V6v.-,P0).',%I)"!E%|#"y?w_{ts9Zvutsrkpi/mfNjihg`e^$b[Z~X]\[ZYRv98TSLKoO10FKDh+GFE>CB;_?>=}|49870/.R2+*Non&%I#"!&%${A!~}_u;yxqpo5mrqpoh.lkdibgf_%]\[!_XW{[ZYXQPt7SRQPOHGkKJIHAF?cC<;@?8\6;492V6v.-,P*p.'K+$j"'~D|#"y~wv<]yxqvutsrk1onmfN+cba`&d]#DZ_^]VzTSXQVOs65QJINGkE-IBAe(D=<A:98\654981Uv.32+*)M-,%k#(!E}$#"!x>v{t:xwputm3kpoh.fN+Lbg`ed]\"!Y^]VzZYXQVOsS54JImMFKJIHAe?>C<`@?87[;{32V05.-2+O)o-,+$H('&}Cdzy~wv<]sxqvonm3k1oQmf,jihgfeG]#a`_X|V[TxXQPUTMLp3ONMLEDhH*)ED=a;@?>76;4X816/43,P*).',%I#i!&}|Bcb~w|u;yxwputm3qSong-kjihgfH%]\a`_XW{UTYXQuUTMRKPOHlFKDhBAe?>=B;_9>=6Z:981Uv.32+*)M-,%k#(!E%$#c!x>|u;yxZpo5srqSi/z

온라인으로 사용해보십시오!




1

8088 어셈블리, IBM PC DOS, 34 바이트

바이트 xxd:

00000000: 43e8 0900 e806 00b0 20cd 10eb f3b1 04d2  C....... .......
00000010: c38a c324 0f3c 0a7c 0204 0704 30b4 0ecd  ...$.<.|....0...
00000020: 10c3

미 조립 :

        BYTE_LOOP: 
43          INC  BX             ; increment counter  
E8 0009     CALL HB             ; display high byte 
E8 0006     CALL HB             ; display low byte 
B0 20       MOV  AL, ' '        ; display space delimiter
CD 10       INT  10H            ; call BIOS, write char to console 
EB F3       JMP  BYTE_LOOP      ; keep looping forever
        HB PROC 
B1 04       MOV  CL, 4          ; set up bitshift for 4 bits 
D2 C3       ROL  BL, CL         ; shift counter left 4 bits 
8A C3       MOV  AL, BL         ; put counter into AL 
24 0F       AND  AL, 0FH        ; isolate nibble 
3C 0A       CMP  AL, 0AH        ; is nibble A-F? 
7C 02       JL   NOT_ALPHA      ; if not, skip adjustment 
04 07       ADD  AL, 'A'-'9'-1  ; adjust ASCII value to A-F 
        NOT_ALPHA: 
04 30       ADD  AL, '0'        ; decimal to binary convert
B4 0E       MOV  AH, 0EH        ; BIOS tty function
CD 10       INT  10H            ; call BIOS, write char to console 
C3          RET                 ; return to program
        HB ENDP

독립형 PC DOS의 정확한 출력은 콘솔로 출력되며 프로그램이 중지 될 때까지 계속 표시됩니다. 여기에 스크래치 ASCII 조작 프로그램이 있습니다. 출력을 위해 이진 값을 문자열로 변환하는 x86 또는 DOS / BIOS API에는 내장 또는 편리한 메소드가 없습니다.

산출:

여기에 이미지 설명을 입력하십시오


1

MUMPS , 57 바이트

f i=1:1:48 w $tr(i\16,0),$e("0123456789abcdef",i#16+1),!

산출

>d ^xmsdgolf
1
2
3
4
5
6
7
8
9
a
b
c
d
e
f
10
11
..
28
29
2a
2b
2c
2d
2e
2f
30

설명

f i=1:1:48                     ; loop from 1 to 48
w $tr(i\16,0)                  ; print i div 16, and ditch any zeros
$e("0123456789abcdef",i#16+1)  ; extract the nth character from the string, where n is i mod 16 + 1
!                              ; crlf

0

하스켈, 52 바이트

a="0123456789abcdef";main=mapM putStrLn$mapM id[a,a]

0

파이썬 2-57 바이트

h='0123456789ABCDEF'
' '.join([i+j for i in h for j in h])

공백 사이에 00-FF를 출력합니다.

당사 사이트를 사용함과 동시에 당사의 쿠키 정책개인정보 보호정책을 읽고 이해하였음을 인정하는 것으로 간주합니다.
Licensed under cc by-sa 3.0 with attribution required.