Al tratar de jugar varias de mis respuestas, he necesitado escribir enteros grandes en la menor cantidad de caracteres posible.

Ahora sé la mejor manera de hacer eso: conseguiré que escribas este programa.

El reto

• Escriba un programa que, cuando se le da un número entero positivo, genera un programa que lo imprime en stdout o equivalente.
• Los programas de salida no tienen que estar en el mismo idioma que el creador.
• La salida debe tener como máximo 128 bytes.
• Puede aceptar la entrada de stdin o equivalente (no entrada de función)
• Puede enviar el programa resultante a stdout o equivalente.
• El número de salida debe estar en decimal (base 10)

Tanteo

Su puntaje es igual al menor entero positivo que su programa no puede codificar.

La entrada con la mayor puntuación gana.

Python 3 → CJAM, (163 ¹²² - 1) · 255/162 + 1 ≈ 1,213 · 10 ²⁷⁰

import sys
n = int(input())
for b in range(163, 1, -1):
    s = []
    m = n
    while m:
        m, r = divmod(m - 93, b)
        if m < 0:
            break
        s.append(r + 93)
    else:
        sys.stdout.buffer.write(b'"%s"%db' % (bytes(s[::-1]), b))
        break
else:
    sys.stdout.buffer.write(b'%d' % n)

Resulta que cada número entero desde 1023 hasta (163 ¹²² - 1) · 255/162 se puede representar al menos de una manera mediante una conversión de base b ≤ 163 a partir de una cadena de 122 caracteres como máximo con códigos 93 a b + 92, en lugar de los habituales 0 a b - 1. Esto evita los caracteres problemáticos 34 (comillas dobles) y 92 (barra invertida) sin ningún código de salida adicional.

Pyth, 252 ¹¹¹ ≈ 3,593 × 10 ²⁶⁶

Js[
"ixL-rC1`H``N"
N
s@L-rC1`H``NjQ252
N
"252")$import sys$$sys.stdout.buffer.write(J.encode('iso-8859-1'))$

Tuve que usar un poco de sintaxis de Python, porque Pyth printno puede imprimir iso-8859-1.

El número se codifica en la base 252 y representa cada dígito en esa base como un carácter iso-8859-1. Los caracteres \y "necesitarían escapar, y por lo tanto no se usan. El carácter `no se usa porque juega al golf ... Y además, el byte nulo tampoco se usa, el compilador Pyth lo prohíbe.

La salida es un programa con una sobrecarga de 17 bytes:

ixL-rC1`H``N""252

Aquí hay un ejemplo de uso con el mayor número posible:

Explicación

del programa de salida.

ixL-rC1`H``N""252
    rC1`H          create the range of chars: ['\x01', '\x02', ..., '{}']
         ``N       creates a string containing the 3 chars " ' \
   -               remove strings which consists of these 3 chars
 xL         ""     determine the index of each char in "" (encoded number)
i             252  convert from base 253 to base 10

CJAM, 254 ¹⁰⁹ ≈ 1,34 x 10 ²⁶²

q~254b{_33>+_91>+c}%`"{_'[>-_'!>-}%254b"

Estoy codificando el número en la base 254 y represento cada dígito en esa base como un carácter ISO 8859-1, omitiendo "y \. La salida tiene una sobrecarga de 19 bytes, ""{_'[>-_'!>-}%254bpor lo que puedo representar todo menos de 254 ^128-19 , o explícitamente

13392914970384089616967895168962602841770234460440231501234736723328784159136966979592516521814270581662903357791625539571324435618053333498444654631269141250284088221909534717492397543057152353603090337012149759082408143603558512232742912453092885969482645766144

Como ejemplo, 6153501se codificaría como

"abc"{_'[>-_'!>-}%254b

Aquí hay un programa de prueba que imprime el número entero codificado, y luego imprime su longitud, y luego lo ejecuta de inmediato para mostrar su validez (esto evita el problema de tener que copiar los caracteres no imprimibles en un nuevo programa, que no siempre funciona con el intérprete en línea).

Perl, 10 ²¹⁶

print"print unpack'h*',q{",(pack'h*',<>),"}"

También codificación base 100, ligeramente más elegante. La salida para 12345678sería:

print unpack'h*',q{!Ce‡}

Los delimitadores {y }corresponden a valores hexadecimales b7y d7respectivamente, que no pueden aparecer en la entrada y, por lo tanto, no necesitan escapar.

Hay 20 bytes de sobrecarga, dejando 108 para la codificación, alcanzando un valor máximo de 10 ²¹⁶ -1.

Perl, 10 ²⁰⁶

print"ord=~print\$' for'",(map chr"1$_",<>=~/.{1,2}/g),"'=~/.|/g"

Codificación base 100 simple. La salida para 12345678se vería así:

ord=~print$' for'p†œ²'=~/.|/g

Hay 25 bytes de sobrecarga, dejando 103 para la codificación, alcanzando un valor máximo de 10 ²⁰⁶ -1.

Lisp común, ^36114-1 ~ 2.62 × ¹⁰¹¹⁷

(lambda(x)(format t"(lambda()#36r~36r)"x))

El número más grande es:

2621109035105672045109358354048170185329363187071886946329003212335230440027818091139599929524823562064749950789402494298276879873503833622348138409040138018400021944463278800021944463278000

Simplemente use la base 36. Para la entrada más grande, la salida de 128 bytes es:

(lambda()#36rzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz)

CJAM, 233 ¹¹⁴ ≈ 7.561⋅10 ²⁶⁹

ri233b{Kms/m]_34=+c}%s`"{iKms*}%233b"

El programa de salida "…"{iKms*}%233bdecodifica los caracteres de 8 bits de una cadena para basar 233 dígitos con n ↦ ⌊ n ⋅ sin 20⌋ = ⌊ n ⋅ 0.913⌋. Esta transformación resulta ser sobreyectiva sin requerir los puntos de código críticos 34 (comillas dobles) y 92 (barra invertida) como entrada.