Мій тато - викладач у відставці, і він використовував комбіновані вікторини з написання орфографії та математики, де учень писав слово, а потім «забивав» слово, додаючи літери, де a = 1, b = 2 тощо. (наприклад, кішка = 3 + 1 + 20 = 24). Це полегшило класифікацію вікторини, оскільки йому просто доведеться перевірити наявність неправильних «балів», а не неправильно написаних слів, і отримав додаткову перевагу тестування 2 навичок одночасно.

Він найняв мого друга, щоб він написав програму, яка б набирала слова для нього, щоб він міг генерувати тривалі клавіші відповідей без помилок. Ця проблема натхненна цією програмою.

Вимоги:

1. Прийміть будь-яке слово з великих і малих літер
2. Поверніть помилку для будь-яких спеціальних символів, тобто пробілів, дефісів, @ ^% # і т.д.
3. a = 1, b = 2, ... і A = 1, B = 2, ...
4. Роздрукуйте рахунок слова
5. (Необов’язково) перевірте, чи є слово в словнику після озвучення, і надрукуйте попередження, якщо воно не є.
6. Немає імпорту словника зовнішніх літер-> цифр. Ви повинні створити його самостійно.

Будь-яка мова є прийнятною. Це схоже на " цифровий кореневий бій ", але набагато простіше.

Гольфскрипт - 23 символи

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

Переконайтесь, що немає нових вхідних рядків (наприклад, використання echo -n).

Brainf *** (100)

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

Я маю визнати, хоча це не зовсім відповідає всім вимогам. По-перше, він приймає лише великі літери, а слово має закінчуватися вкладкою. Він має невизначену поведінку для недійсних символів і не видає помилки. Він відображає суму літер як символ ASCII. Наприклад, якщо слово "HELLO", (8 + 5 + 12 + 12 + 15 = 52), воно відобразить символ "4", що є символом ASCII для 52. Це також означає, що програма вироджується, коли сума більше 255.

Але крім цього , це працює просто чудово. Дайте мені перерву, мій мозок може впоратися лише з невеликими дозами ... ну, знаєте.

Пітон ( 65 64)

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

Це спричиняє помилку, якщо слово містить небуквені символи, але не корисні чи інформативні. (Редагувати: кінчик капелюха до st0le для індексу індексу.)

Рубі, 43 символи

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

Повідомлення про помилку, яке це створює, не зовсім корисне. Обидва рішення, розміщені тут, передбачають, що на вході немає кінцевої лінії, тому для тестування їх використовуйте echo -n.

Рубін, 76 символів зі словниковою перевіркою

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

Попереджувальне повідомлення складається з одного символу "W". Шлях до словника повинен надаватися через ARGV. Приклад використання:

$ 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 символи) Без перевірки словника

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

Python 2.6 (178 символів *) За допомогою перевірки словника

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')

_{* Можна знизити до 156 за допомогою менш корисного повідомлення про помилку. :-)}

Дякуємо всім коментаторам за допомогу в покращенні цього.

Perl (52) (48)

golfed ще більше завдяки Timwi

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

Пітон (80)

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

Python v2 (65, але char `буде прийнято)

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

v3 (60 символів, @ буде прийнято, але не буде враховано, спасибі jloy)

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

Scala: 59 знаків, 7 з них корисна навантаження, без диктату:

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

Поки що жодного словника. Негативний результат означає: Негативний!

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

До речі, витончено поводиться з німецьким Umlaute:

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

Бібліотеки Java + Google Guava, 347 символів, за допомогою словника

Нечитабельна 1 довга версія рядка :-)

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);}}

Прочитана людиною версія (сорт :-))

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);
    }
}

Шлях до словника тепер передається через a[1], для тверджень для роботи вам потрібно використовувати -eaпрапор (+3 більше символів). Що стосується словника, то використовується dict /usr/share/dict/words(має бути доступним у більшості * nix систем).

Python 3, 95 символів зі словником

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

Словник повинен бути у файлі, який називається d.

Python 3, 61 без словника, але вкрадена ідея

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))

Правка: З валідацією є:

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

129 символів. У якому випадку:

C #, 118

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

Трохи покращуючи відповідь Джона: Python (90)

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

Ерланг, 104

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

Гольфскрипт - 39 символів

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

Помилка, яку він викидає, не зовсім найкраща, але ей, вона припиняє виконання.

PYTHON 62 68 * Персонажі

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

Потрібен користувач для введення рядків, використовуючи лапки, і не є безпечним ( inputвиконує код), але, як я вже сказав у коментарі до іншої публікації, "полегшений користувачеві" та "не ризик для безпеки" немає в специфікації!

_{* Я забув print, чорт.}

Рубін 1,9, 69

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

GolfScript, 50 (53)

Помилка поганих символів, але не дуже хороша (50 символів):

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

Дає замість помилки "E" (53 символи):

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

Фрагмент, що генерує алфавіт 123,97>+, викрадений у Вентеро.

J (55)

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

Це задовольняє всі умови, крім словникової. Як умова помилки, вона повертає "нескінченність" (символ підкреслення в J) для слів, які містять що-небудь, крім букв.

Haskell (127)

(викликає помилку на дивних символах)
(також: пробіл між toUpper.і \xпотрібен, інакше він аналізує його як (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"")

Хаскелл (70)

(не викликає помилку, але на 45% коротше)

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;}

"Налаштування" / тощо:

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

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

"Не визначена" поведінка (Це більше "погана практика", ніж "невизначена", але так добре):

• void main() Це все говорить.
• Я використовую newбез delete.

JavaScript 1.8, 80 символів

Дивно читабельно!

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

APL (34)

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

Дає або бал, або а VALUE ERROR якщо у введенні є не алфавітні символи.

Пояснення:

• ⍞: читати рядок введення
• {...} : функція, застосована до кожного символу вводу
• A←⎕UCS⍵: зберігає значення ASCII поточного символу в A
• A-32×96<A: Зробити символом великі регістри: від Aвіднімається 32, якщо96<A (так, якщо це великі регістри), інакше 0
• 64-⍨: відніміть 64 з цього, даючи A = 1, B = 2 ...
• ¨: застосувати цю функцію до кожного символу:
• ⍵∊⍳26: якщо персонаж між 1 і 26 ...
• :⍵: тоді поверніть ⍵ (а оскільки немає іншого пункту, буде a, VALUE ERRORякщо його немає між 1 і 26)
• +/: підсумовуйте всі значення разом (і це значення автоматично виводиться, оскільки це кінцевий результат).

JavaScript, 60 байт

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

If the program must return an error on invalid inputs, then 80 bytes:

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

If an input is invalid, then the console will say that _ is not defined (there must not already be a variable defined called _).

Python 3, 58 55

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

without dictionary or stolen idea but still unhelpful error ;)

thx @Eᴀsᴛᴇʀʟʏ

Test here.

C, 98 bytes

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

F# (no validation) 79 57 chars

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

C# with validation: 108 chars (with 12 for error message):

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

C# without validation: 60 53 chars:

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

Perl (42 31)

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

I hope counting F, p, a and l as 1 character was correct.

JavaScript, 68 Bytes

This can almost certainly be golfed more

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

With dictionary check (Node.js & Unix Descendants only) 195 Bytes

Uses /usr/share/dict/words, and can definitely be shortened (see the warn message)

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))