Mon père est un enseignant à la retraite, et il donnait des tests d'orthographe et de mathématiques combinés, où l'élève épelait un mot, puis `` notait '' le mot en additionnant les lettres, où a = 1, b = 2, etc. (par exemple chat = 3 + 1 + 20 = 24). Cela rendait la notation des questionnaires plus facile, car il aurait juste à vérifier les «scores» incorrects plutôt que les mots mal orthographiés, et avait l'avantage supplémentaire de tester 2 compétences à la fois.

Il a engagé un de mes amis pour écrire un programme qui marquerait des mots pour lui, afin qu'il puisse générer de longues réponses sans erreur. Ce problème est inspiré par ce programme.

Exigences:

1. Acceptez n'importe quel mot avec des lettres majuscules et minuscules
2. Renvoie une erreur pour tous les caractères spéciaux, c'est-à-dire les espaces, les tirets, @ ^% # etc.
3. a = 1, b = 2, ... et A = 1, B = 2, ...
4. Imprimer la partition du mot
5. (Facultatif) vérifiez que le mot figure dans un dictionnaire après la notation et imprimez un avertissement s'il ne l'est pas.
6. Pas d'importation d'un dictionnaire externe de lettres-> chiffres. Vous devez le générer vous-même.

N'importe quelle langue est acceptable. Ceci est similaire à la « bataille racine numérique », mais beaucoup plus simple.

Golfscript - 23 caractères

0\{.31&.(.26%=@64///+}/

Assurez-vous qu'il n'y a pas de retour à la ligne en entrée (par exemple, utilisation echo -n).

Brainf *** (100)

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

Je dois cependant admettre que cela ne répond pas tout à fait à toutes les exigences. Tout d'abord, il n'accepte que les majuscules et le mot doit se terminer par un onglet. Il a un comportement indéfini pour les caractères non valides et ne génère pas d'erreur. Il affiche la somme des lettres sous forme de caractère ASCII. Par exemple, si le mot est "BONJOUR", (8 + 5 + 12 + 12 + 15 = 52), il affichera le caractère "4", qui est le caractère ASCII pour 52. Cela signifie également que le programme panique lorsque la somme est supérieure à 255.

Mais à part ça , ça marche très bien. Donnez-moi une pause, mon cerveau ne peut gérer que de petites doses de ... enfin, vous savez.

Python ( 65 64)

print sum(['',ord(i)-64]['@'<i<'[']for i in raw_input().upper())

Cela soulève une erreur si le mot contient des caractères autres que des lettres, mais pas un caractère utile ou informatif. (Edit: pointe du chapeau à st0le pour l'astuce d'indexation.)

Ruby, 43 caractères

$_=gets.upcase;p~/[^A-Z]/?_: $_.sum-64*~/$/

Le message d'erreur que cela génère n'est cependant pas vraiment utile. Les deux solutions publiées ici supposent que l'entrée n'a pas de saut de ligne de fin, donc pour les tester, utilisez echo -n.

Ruby, 76 caractères avec vérification du dictionnaire

l=STDIN.gets;$_=l.upcase;p~/[^A-Z]/?_: $_.sum-64*~/$/;[*$<].index(l)||$><<?W

Le message d'avertissement se compose du seul caractère "W". Le chemin d'accès au dictionnaire doit être fourni via ARGV. Exemple d'utilisation:

$ echo -n asd | ruby addletters.rb /usr/share/dict/words
24
W
$ echo -n cat | ruby addletters.rb /usr/share/dict/words
24

Python 2.6 (72 caractères) sans vérification du dictionnaire

print sum(map(" abcdefghijklmnopqrstuvwxyz".index, raw_input().lower()))

Python 2.6 (178 caractères *) avec vérification du dictionnaire

w=raw_input().lower()
print sum(map(" abcdefghijklmnopqrstuvwxyz".index, w))
if w not in open('/usr/share/dict/american-english').read().split():
 print('Word not in dictionary')

_{* Peut être abaissé à 156 avec un message d'erreur moins utile. :-)}

Merci à tous les commentateurs d'avoir aidé à améliorer cela.

Perl (52) (48)

golf encore plus grâce à Timwi

perl -lpe "($w=uc)=~/[^A-Z]/&¨$w=~s/./$_-=64-ord$&/ge"

Python (80)

w=raw_input().lower()
s=0
for l in w:s+=range(97,123).index(ord(l))+1
print s

Python v2 (65 mais le caractère `sera accepté)

print sum(map(range(96,123).index,map(ord,raw_input().lower())))

v3 (60 caractères, @ seront acceptés mais non comptés, merci jloy)

print sum(map(range(64,91).index,map(ord,input().upper())))

Scala: 59 caractères, dont 7 de charge utile, pas de dict:

(0/:"Payload".map(c=>if(c.isLetter)(c-'A')%32 else-999))(_+_)
67

Pas de dictionnaire pour l'instant. Un résultat négatif signifie: Négatif!

(0/:"Pay!wall?".map(c=>if(c.isLetter)(c-'A')%32 else-999))(_+_)   
-1915

Manipule le tréma allemand avec grâce, soit dit en passant:

(0/:"Müllrößchen".map(c=>if(c.isLetter)(c-'A')%32 else-999))(_+_)
155

Bibliothèques Java + Google Guava, 347 caractères, avec vérification du dictionnaire

Version illisible à 1 chaîne longue :-)

import java.io.*;import com.google.common.base.*;import com.google.common.io.*;class C{public static void main(String[]a)throws Exception{int s=0;for(int c:a[0].toUpperCase().toCharArray()){assert(c>64&&c<91);s+=c-64;}String d=Files.toString(new File(a[1]),Charsets.UTF_8);if(StringUtils.containsIgnoreCase(d,a[0]))System.out.println("w");System.out.println(s);}}

Version lisible par l'homme (sorte de :-))

import java.io.*;

import com.google.common.base.*;
import com.google.common.io.*;

class C {
    public static void main(String[] a) throws Exception {
        int s=0;

        for(int c : a[0].toUpperCase().toCharArray()) {
            System.out.println(c);
            assert(c > 64 && c < 91);
            s += c - 64;
        }

        String d = Files.toString(new File(a[1]), Charsets.UTF_8);

        if (d.contains(a[0])) System.out.println("w");

        System.out.println(s);
    }
}

Le chemin du dictionnaire est maintenant transmis via a[1], pour que les assertions fonctionnent, vous devez utiliser l' -eaindicateur (+3 caractères supplémentaires). Quant au dictionnaire, le dict /usr/share/dict/words(qui devrait être disponible sur la plupart des systèmes * nix) a été utilisé.

Python 3, 95 caractères avec dictionnaire

d=input().lower()
print(d in open("d").read()and sum(['',ord(c)-96]['`'<c<'{']for c in d)or'f')

Le dictionnaire doit être dans un fichier appelé d.

Python 3, 61 sans dictionnaire, mais idée volée

print(sum(['',ord(c)-96]['`'<c<'{']for c in input().lower()))

Perl (71)

($a)=lc<>;$a=~/[^a-z]/i&&die;$x+=ord$_ for split//,$a;die$x-96*length$a;

VB.NET, 84 82 73 71

Console.Write(Console.ReadLine.Sum(Function(c)Asc(Char.ToUpper(c))-64))

Modifier: Avec validation est:

Dim r=Console.ReadLine
Console.Write(If(r.All(AddressOf Char.IsLetter),r.Sum(Function(c)Asc(Char.ToUpper(c))-64),"Invalid input."))

129 caractères. Dans quel cas:

C #, 118

var r=Console.ReadLine();Console.Write(r.All(char.IsLetter)?r.Sum(c=>char.ToUpper(c)-64).ToString():"Invalid input.");

Améliorant légèrement la réponse de John: Python (90)

s=0
for i in raw_input().lower():
 s+=("abcdefghijklmnopqrstuvwxyz".index(i)+1)
print(s)

Erlang, 104

a()->
a(string:to_lower(io:get_line([])),0).
a([_|[]],S)->
S;
a([C|R],S) when C<${, C>=$`->
a(R,S+C-$`).

Golfscript - 39 caractères

n%~{.96>{96}{64}if-..26>\0<|{0/}*}%{+}*

L'erreur qu'elle lance n'est pas exactement la meilleure, mais bon, elle interrompt l'exécution.

PYTHON 62 68 * Caractères

print sum(map(chr,range(65,91)).index(c)+1 for c in input().upper())

Nécessite que l'utilisateur entre des chaînes à l'aide de guillemets et n'est pas sûr ( inputexécute le code), mais, comme je l'ai dit dans un commentaire à un autre article, "convivial" et "pas un risque pour la sécurité" n'est pas dans la spécification!

_{* J'ai oublié print, bon sang.}

Rubis 1.9, 69

w=gets.chop.upcase
w[/[^A-Z]/]&&fail
p w.bytes.inject(0){|s,b|s+b-64}

GolfScript, 50 (53)

Donne une erreur sur les mauvais caractères, mais pas très bonne (50 caractères):

);[{""123,97>+91,65>+?}/].-1?0<{{26%1+}%{+}*}{@}if

Donne plutôt "E" en cas d'erreur (53 caractères):

);[{""123,97>+91,65>+?}/].-1?0<{{26%1+}%{+}*}{;"E"}if

L'extrait de génération d'alphabet 123,97>+est volé à Ventero.

J (55)

+/64-~-&32`]@.(<&97)`_:@.(<&65)`_:@.(>&122)"0,I.a.&e."0

Cela satisfait toutes les conditions sauf celle du dictionnaire. En tant que condition d'erreur, il renvoie "infini" (le symbole de soulignement en J) pour les mots qui contiennent autre chose que des lettres.

Haskell (127)

(soulève une erreur sur les caractères étranges)
(aussi: l'espace entre toUpper.et \xest nécessaire sinon il le traite comme (toUpper) .\ (x))

import Char
main=getLine>>=putStrLn.show.sum.(map$(-65+).ord.toUpper. \x->if x`elem`['A'..'Z']++['a'..'z']then x else error"")

Haskell (70)

(ne génère pas d'erreur, mais 45% plus court)

import Char
main=getLine>>=putStrLn.show.sum.(map$(-65+).ord.toUpper)

C ++ ( 111 107)

void main(){int a=0;s8*b=new s8[99];for(cin>>b;*b;)if(isalpha(*b))a+=tolower(*b++)-96;else return;cout<<a;}

Le "set up" / etc:

#include <iostream>
#include <cstdio>
#include <cctype>

#ifdef _MSC_VER
    typedef __int8 s8;
#else
    typedef signed char s8;
#endif

Comportement "non défini" (c'est plus une "mauvaise pratique" qu'un "non défini", mais bon):

• void main() Cela dit tout.
• J'utilise newsans delete.

JavaScript 1.8, 80 caractères

Étonnamment lisible!

alert(Array.reduce(prompt().toLowerCase(),function(a,b)a+b.charCodeAt(0)-96,0))

APL (34)

+/{⍵∊⍳26:⍵}¨{64-⍨A-32×96<A←⎕UCS⍵}⍞

Donne soit le score, soit un VALUE ERRORs'il y a des caractères non alphabétiques dans l'entrée.

Explication:

• ⍞: lire une ligne d'entrée
• {... }: fonction appliquée à chaque caractère d'entrée
• A←⎕UCS⍵: stocke la valeur ASCII du caractère courant dans A
• A-32×96<A: rendre le caractère majuscule: de Aest soustrait 32 si 96<A(donc, s'il est en majuscule), sinon 0
• 64-⍨: soustrayez 64 de ceci, donnant A = 1, B = 2 ...
• ¨: appliquez cette fonction à chaque personnage:
• ⍵∊⍳26: si le personnage est compris entre 1 et 26 ...
• :⍵: alors retourne ⍵ (et puisqu'il n'y a pas de clause else, il y aura un VALUE ERRORsi ce n'est pas entre 1 et 26)
• +/: somme toutes les valeurs ensemble (et cette valeur est automatiquement sortie car c'est le résultat final).

JavaScript, 60 octets

s=>[...s.toUpperCase()].reduce((a,b)=>a+b.charCodeAt()-64,0)

Si le programme doit renvoyer une erreur sur des entrées invalides, alors 80 octets:

s=>/[^a-z]/i.test(s)?_:[...s.toUpperCase()].reduce((a,b)=>a+b.charCodeAt()-64,0)

Si une entrée n'est pas valide, la console dira qu'elle _n'est pas définie (il ne doit pas déjà y avoir de variable définie appelée _).

Python 3, 58 55

print(sum(ord(x)%32for x in input()if x.isalpha()or z))

sans dictionnaire ou idée volée mais erreur toujours inutile;)

thx @ Eᴀsᴛᴇʀʟʏ

Testez ici .

C, 98 octets

 int a(char *s){int b=0;while(*s){if(!isalpha(*s))throw 1;b+=(toupper(*(s++))-64);}printf("%d",b);}

F # (pas de validation) 79 57 caractères

let a w=w|>Seq.fold(fun a b->a+(int b)-65)0|>printfn"%i"

C # avec validation: 108 caractères (dont 12 pour le message d'erreur):

var s=Console.ReadLine();Console.Write(s.All(Char.IsLetter)?s.Sum(x=>x&'_'-'@').ToString():"Invalid input");

C # sans validation: 60 53 caractères:

Console.Write(Console.ReadLine().Sum(x=>x&'_'-'@'));

Perl (42 31)

perl -F -pale '$c+=ord(uc$_)-64for@F;$_=$c'

J'espère que compter F, p, a et l comme 1 caractère était correct.

JavaScript, 68 octets

Cela peut certainement être joué plus

w=>[...w.toLowerCase()].map(v=>v.charCodeAt()-96).reduce((a,b)=>a+b)

Avec vérification du dictionnaire (Node.js et descendants Unix uniquement) 195 octets

Utilise /usr/share/dict/wordset peut certainement être raccourci (voir le message d'avertissement)

w=>(require("fs").readFile("/usr/share/dict/words",(e,t)=>!(t+"").split`
`.includes(w=w.toLowerCase())&&console.warn(w+" not found in dict")),[...w].map(v=>v.charCodeAt()-96).reduce((a,b)=>a+b))