Cha tôi là một giáo viên đã nghỉ hưu, và ông thường đưa ra các câu đố chính tả và toán học kết hợp, trong đó học sinh sẽ đánh vần một từ, sau đó 'chấm điểm' từ đó bằng cách thêm các chữ cái, trong đó a = 1, b = 2, v.v. (ví dụ: mèo = 3 + 1 + 20 = 24). Điều này làm cho việc chấm điểm các câu đố dễ dàng hơn, vì anh ta sẽ chỉ phải kiểm tra 'điểm số' không chính xác thay vì các từ viết sai chính tả và có thêm lợi ích của việc kiểm tra 2 kỹ năng cùng một lúc.

Anh ấy đã thuê một người bạn của tôi để viết một chương trình ghi điểm cho anh ấy, vì vậy anh ấy có thể tạo ra các phím trả lời dài mà không gặp lỗi. Vấn đề này được lấy cảm hứng từ chương trình đó.

Yêu cầu:

1. Chấp nhận bất kỳ từ nào có chữ hoa và chữ thường
2. Trả về lỗi cho bất kỳ ký tự đặc biệt nào, ví dụ khoảng trắng, dấu gạch nối, @ ^% #, v.v.
3. a = 1, b = 2, ... và A = 1, B = 2, ...
4. In số điểm của từ
5. (Tùy chọn) kiểm tra xem từ đó có trong từ điển sau khi ghi điểm không và in cảnh báo nếu không.
6. Không nhập một chữ cái bên ngoài-> số từ điển. Bạn phải tự tạo ra nó.

Bất kỳ ngôn ngữ đều được chấp nhận. Điều này tương tự như ' trận chiến gốc kỹ thuật số ', nhưng đơn giản hơn nhiều.

Golfscript - 23 ký tự

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

Đảm bảo không có dòng mới nào trong đầu vào (ví dụ: sử dụng echo -n).

Brainf *** (100)

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

Tôi phải thừa nhận mặc dù, điều này không hoàn toàn tuân thủ tất cả các yêu cầu. Đầu tiên, nó chỉ chấp nhận chữ in hoa và từ phải được kết thúc bằng một tab. Nó có hành vi không xác định cho các ký tự không hợp lệ và không gây ra lỗi. Nó hiển thị tổng của các chữ cái dưới dạng ký tự ASCII. Ví dụ: nếu từ là "HELLO", (8 + 5 + 12 + 12 + 15 = 52) thì nó sẽ hiển thị ký tự "4", đó là ký tự ASCII cho 52. Điều này cũng có nghĩa là chương trình sẽ phát điên khi tổng là hơn 255.

Nhưng khác hơn , nó hoạt động tốt. Hãy cho tôi nghỉ ngơi, bộ não của tôi chỉ có thể xử lý liều lượng nhỏ ... tốt, bạn biết đấy.

Con trăn ( 65 64)

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

Điều này gây ra lỗi nếu từ chứa các ký tự không phải chữ cái, nhưng không phải là một ký tự hữu ích hoặc thông tin. (Chỉnh sửa: chóp mũ để st0le cho thủ thuật lập chỉ mục.)

Ruby, 43 ký tự

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

Thông báo lỗi này tạo ra không chính xác hữu ích, mặc dù. Cả hai giải pháp được đăng ở đây đều cho rằng đầu vào không có dấu ngắt dòng, vì vậy để kiểm tra chúng, hãy sử dụngecho -n .

Ruby, 76 ký tự với kiểm tra từ điển

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

Thông điệp cảnh báo bao gồm ký tự đơn "W". Đường dẫn đến từ điển phải được cung cấp qua ARGV. Ví dụ sử dụng:

$ 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 Chars) Không cần kiểm tra từ điển

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

Python 2.6 (178 Chars *) Với kiểm tra từ điển

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

_{* Có thể hạ xuống 156 với thông báo lỗi ít hữu ích hơn. :-)}

Cảm ơn tất cả các bình luận đã giúp cải thiện điều này.

Perl (52) (48)

chơi golf nhiều hơn nhờ Timwi

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

Con trăn (80)

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

Python v2 (65 nhưng char `sẽ được chấp nhận)

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

v3 (60 ký tự, @ sẽ được chấp nhận nhưng không được tính, cảm ơn jloy)

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

Scala: 59 ký tự, 7 trong số chúng tải trọng, không có lệnh:

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

Không có từ điển cho đến nay. Kết quả tiêu cực có nghĩa là: Tiêu cực!

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

Bằng cách xử lý Umlaute Đức duyên dáng, nhân tiện:

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

Thư viện Java + Google Guava, 347 ký tự, với kiểm tra từ điển

Không thể đọc được 1 phiên bản chuỗi dài :-)

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

Phiên bản có thể đọc được của con người (loại :-))

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

Đường dẫn từ điển hiện được chuyển qua a[1], để xác nhận hoạt động, bạn phải sử dụng -eacờ (thêm 3 ký tự). Đối với từ điển, dict /usr/share/dict/words(nên có sẵn trên hầu hết các hệ thống * nix) đã được sử dụng.

Python 3, 95 ký tự với từ điển

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

Từ điển phải ở trong một tập tin gọi là d.

Python 3, 61 không có từ điển, nhưng ý tưởng bị đánh cắp

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

Edit: With validation is:

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

129 characters. In which case:

C#, 118

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

Improving slightly on John's answer: 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 chars

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

The error it throws is not exactly the best, but hey, it aborts execution.

PYTHON 62 68* Characters

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

Requires user to input strings using quotes, and is not safe (input executes code), but, as I said in a comment to another post, "user-friendly" and "not a security risk" ain't in the spec!

_{* I forgot about print, dammit.}

Ruby 1.9, 69

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

GolfScript, 50(53)

Gives an error on bad characters, but not a very good one (50 characters):

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

Gives "E" on error instead (53 characters):

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

The alphabet-generating snippet 123,97>+ is stolen from Ventero .

J (55)

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

This satisfies all the conditions except the dictionary one. As an error condition, it returns "infinity" (the underscore symbol in J) for words that contain anything but letters.

Haskell (127)

(đưa ra một lỗi trên các ký tự lạ)
(cũng: khoảng trống giữa toUpper.và \xlà cần thiết nếu không nó phân tích nó thành (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)

(không đưa ra lỗi, nhưng ngắn hơn 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;}

"Thiết lập" / etc:

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

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

Hành vi "Không xác định" (Đó là 'thực hành xấu' hơn 'không xác định', nhưng ồ):

• void main() Điều đó nói lên tất cả.
• Tôi đang sử dụng newmà không có delete.

JavaScript 1.8, 80 ký tự

Đáng ngạc nhiên có thể đọc được!

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

APL (34)

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

Cho điểm số hoặc VALUE ERROR nếu có các ký tự không phải là chữ cái trong đầu vào.

Giải trình:

• ⍞: đọc một dòng đầu vào
• {... }: chức năng được áp dụng cho mọi ký tự đầu vào
• A←⎕UCS⍵: lưu trữ giá trị ASCII của ký tự hiện tại trong A
• A-32×96<A: tạo chữ hoa cho ký tự: từ Abị trừ 32 if 96<A(vì vậy, nếu đó là chữ hoa), nếu không thì 0
• 64-⍨: trừ 64 từ này, cho A = 1, B = 2 ...
• ¨: áp dụng chức năng này cho mọi nhân vật:
• ⍵∊⍳26: nếu nhân vật nằm trong khoảng từ 1 đến 26 ...
• :⍵: sau đó trả về ⍵ (và vì không có mệnh đề nào khác nên sẽ không có VALUE ERRORnếu nó không nằm trong khoảng từ 1 đến 26)
• +/: tổng hợp tất cả các giá trị lại với nhau (và giá trị này được tự động xuất ra vì đó là kết quả cuối cùng).

JavaScript, 60 byte

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

Nếu chương trình phải trả về lỗi trên các đầu vào không hợp lệ, thì 80 byte:

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

Nếu một đầu vào không hợp lệ, thì bàn điều khiển sẽ nói rằng _nó không được xác định (phải không có một biến được định nghĩa được gọi _).

Trăn 3, 58 55

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

không có từ điển hoặc ý tưởng bị đánh cắp nhưng vẫn không có lỗi;)

thx @ Eᴀsᴛᴇʀʟʏ

Kiểm tra tại đây .

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