Sua tarefa é escrever um programa para imprimir a soma dos códigos ASCII dos caracteres do próprio programa. Você não tem permissão para abrir nenhum arquivo (qualquer entrada como argumentos de linha de comando, entrada ou arquivos padrão é proibida).

O programa que imprime o número mais baixo (ou seja, possui a menor soma de códigos ASCII) vence.

Aqui está um exemplo (não o mais curto) de um programa escrito em C:

#include <stdio.h>
int main(){
printf("4950");/*i*/
return 0;
}

(nenhuma nova linha depois })

wc, imprime 0

Alguém disse "línguas de gato", então ...

Um arquivo vazio:

Execute com wc -c file.wc. Com 0 bytes, acho que esse é o vencedor na categoria 'não é realmente uma linguagem de programação'.

Além disso

gato, imprime 80 (base 13)

80

Sem nova linha final, o número 80 ₁₃ é equivalente a 104 em decimal. Você pode ir mais baixo com 60 ₁₇ (102 dec), mas imaginei que "base 13" valeria mais pontos de nerd.

EDIT: Novo wcexemplo, este pode ser executado como um programa.

#!/usr/bin/wc
ÿÿzw17

(Conforme codificado em latim-1 - o ÿ é um byte com o valor 255)

A soma dos bytes é 2223, a saída é:

  2  2 23 ./w

PHP, m4 e outras linguagens semelhantes a gatos: 150

150

Encontrei esta solução usando um programa simples de Haskell para forçá-la a força bruta:

f :: String -> Bool
f s = (read s :: Int) == (sum . map fromEnum) s

main = mapM_ print [filter f $ sequence $ replicate n ['0'..'9'] | n <- [1..10]]

Brainf * ck, 255

-.¤

Isso não imprimirá o número 255, mas o 255º caractere ASCII.

Isso pode ser considerado trapaça porque o compilador BF pula sobre ¤.

Javascript, imprime 9432 6902

(function a(){b="("+a+")()";c=0;for(i=0;i<b.length;i++){c+=b.charCodeAt(i-0)}alert(c)})()

Esta é a primeira solução de quine até agora, a menos que eu não esteja entendendo corretamente a de Haskell .

PowerShell

((310))

imprime 310.

Perl, 500

say     500

Existem duas guias entre saye 500. :)

(Execute como uma linha com perl -E, até onde eu sei, isso está dentro das regras)

Ruby, impressões 380

p (380)

Sem nova linha após o parêntese de fechamento.

PowerShell

(230)

imprime 230, obviamente.

PowerShell

-(-320)

imprime 320.

J, 150

?!6

Com a ressalva de que estará correto apenas 1/720 das vezes.

Python, imprime 781

print  781

Dois espaços.

Element, 220

Esta é uma linguagem de minha própria criação e está documentada na minha resposta a outra pergunta aqui .

220`!

Aqui está uma explicação passo a passo de como ele funciona: O 220número é colocado na pilha. Em seguida, o `` outputs the top element of the stack. The! `Executa uma lógica que não está na pilha de controle (uma pilha separada), configurando-a como 1.

PHP, impressões 4440

<?php
for($x=0;$x<15000;$x++)if($x==4440){printf($x);exit;}

PowerShell, imprime 3902

&{[char[]]$myinvocation.Line|%{$s+=+$_};$s}

Examina a linha atualmente executada e soma os valores do ponto de código.

INTERCAL, 1572

Ainda não acredito que ninguém fez INTERCAL!

DOREADOUT#1572


DOGIVEUP

(Inclui o encerramento da nova linha.) Este programa imprime o MDLXXII.

Perl, impressões 690

die 690 . $/

Ou, se podemos publicar one-liners ( perl -E)

say(570)

Imprime 570.

(Sem novas linhas à direita)

JavaScript, 1750 900 860 790

alert(790)

(Retorno de carro (CR \rou \x0D) após ou antes do programa)

Esses programas são encontrados por força bruta.

Valores maiores:

alert(860)%0
alert(900)&&6
document.write(1750)

Java -128

Sei que ler stdin não é permitido, mas queria fornecer um exemplo de como calculei minha pontuação.

Meu código resume a contagem ASCII de si mesma passada em stdin e imprime -128

class P{public static void main(String[]z)throws Exception{byte v=0;int b=0;while((b=System.in.read())!=-1){v+=(byte)b;}System.out.println(v);}}

Nenhuma nova linha à direita

Ruby, impressões 300

p   300

Há um espaço e uma guia entre o pe o 300. Nenhuma nova linha à direita.

Arquivos em lote, 500

ECHO  500

Além disso, observe os dois espaços entre "ECHO" (maiúscula de propósito) e "500".

C, 1700

Estranho - ninguém postou uma solução C ainda (excluindo o exemplo na pergunta).

main(R){puts("1700");}

Nenhuma nova linha no final.

K ( 923 796 795 746 513)

Não tenho certeza se isso entra em conflito com as regras ou não. Ele não usa stdin, ele se abre como um vetor de bytes e somas.

+/1:.z.f

Uso:

q scriptname.k

editar 2012.05.08 - não é necessário hsym o identificador de arquivo 2012.05.09 - salvou 1 ponto convertendo para byte em vez de int

17/05/2012 - Pode salvar uma carga de pontos lendo o arquivo como bytestream em vez de texto:

J, 198

33*6

e

6*33

Encontrei por força bruta. Em J, não existem soluções de 1 ou 2 caracteres, e a única solução de 3 caracteres é 150. Com exceção de erros na minha pesquisa, também não há outras soluções de 4 caracteres.

No canal #jsoftware IRC, também tínhamos <.%:10!20429 e uma solução de contagem automática +/a.i.2#(,{:)'+/a.i.2#(,{:)'''em 1706.

bc 1160

invocada com eco e espaços em branco, toda a String, incluindo 7 espaços em branco, echo 1160 | bcpossui um soma de bytes de 1160.

echo 1160    |  bc

150 também funcionam para bc:

echo "150" > 150
bc -q 150
150

D, 9752

este realmente calcula semelhante ao meu quine

enum c=q{import std.stdio;void main(){int s;foreach(d;"enum c=q{"~c~"};mixin(c);")s+=d;write(s);}};mixin(c);

Espaço em branco, 369

Este programa de 20 caracteres imprime o número 369, que é a soma dos valores ascii de seus caracteres (que são caracteres de tabulação, espaço e avanço de linha, aqui simbolizados por T, S, L, respectivamente):

SSSTSTTTSSSTLTLSTLLL

(369 = 7 * 9 + 8 * 32 + 5 * 10, sendo 7 Tabs, 8 Spaces e 5 Linefeeds.)

Haskell, 7518

Uma pequena modificação do meu quine :

main=print.sum.map fromEnum$q++show q;q="main=print.sum.map fromEnum$q++show q;q="

Brainf * ck, 253 (ou 252)

Ligeira melhoria na solução de Peter Olson:

---.H

Desde que não imprimíveis sejam permitidos, ele pode ser aprimorado ainda mais adicionando um -e substituindo Hpelo código ASCII 26.

Scala 1090

impressão (1090)

Python, 5440

Maior pontuação ganha, certo?

import sys
print sum(ord(i)for i in open(sys.argv[0]).read())

Eu apenas pensei em publicá-lo de qualquer maneira b / c é uma solução quinine a meio caminho.