Standaryzowane testy zwykle zawierają skan-tron lub jakiś dokument odpowiedzi, który rejestruje twoją odpowiedź. Komputer lub człowiek sprawdzi następnie twoje odpowiedzi i określi twoją ocenę. Więc tutaj, biorąc pod uwagę skan-tron i klucz odpowiedzi, określ wynik i pominięte pytania, jeśli takie istnieją. Scan-tron to tylko dokument z wieloma liniami z odpowiedziami, w których użytkownik wypełnia (w tym przypadku jest zakreślony). Przykład:

   ---
1. |a| b c d
   --- 

Jak widać, jest to pytanie 1 z awybraną opcją odpowiedzi, ponieważ ma wokół niego ramkę. Na wyzwanie, zostanie podana do Scan-tron z npytań ( 1 <= n <= 10) tylko cztery odpowiedzi oznaczone jako a, b, c, lub d. Klucz odpowiedzi zostanie podany jako ciąg bez spacji i małymi literami. Przykładowy scan-tron z kluczem odpowiedzi:

Scan-tron
   ---
1. |a| b c d
   ---
     ---
2. a |b| c d
     ---
       ---
3. a b |c| d
       ---

Answer Key
abb

Możesz pobrać klucz odpowiedzi i scan-tron jako osobne dane wejściowe lub w wybranej kolejności, o ile można je zidentyfikować (tzn. Klucz odpowiedzi jest oddzielony od scan-tron). Wyniki zostaną zaokrąglone do najbliższej dziesiątej punktu. Przykładowe dane wyjściowe dla powyższego:

Score: 66.7
Missed #: 3

Inną możliwą do przyjęcia odpowiedzią byłoby:

66.7 
3

lub jeśli pominięto wiele pytań

66.7
3 4 5

tak długo, jak numery pytań dla pominiętych są oddzielone spacjami i nie znajdują się w tym samym wierszu co wynik.

Zasady i specyfikacje

• Scan-tron może być wprowadzany jako ciąg wieloliniowy lub jedno pytanie na raz (dopuszczalny jest ciąg z nowymi liniami)
• Biorąc pod uwagę scan-tron i klucz odpowiedzi, musisz wypisać wynik w jednej linii, a pytanie (pytania) pominięte w drugiej, z liczbami oddzielonymi spacjami. Jeśli nie pominięto żadnych pytań, nie należy wypisywać numerów pytań
• Wyniki są zaokrąglane do najbliższej dziesiątej

• Wybrane odpowiedzi są otoczone tym polem:

  ---
  | |
  ---
  

• W skanowanym tronie każde pytanie zajmuje trzy spacje (góra i dół ramki zajmują dwie dodatkowe linie)
• Musi działać w powyższym przykładzie
• Załóżmy, że zawsze będzie tylko jedna odpowiedź w ramce

Zwycięskie kryteria

Najkrótszy kod wygrywa!

05AB1E , 43 bajty

U|3ôø`\vyy'|k>èXNèQˆ}¯OXg/3°*2z+ïT/XgL¯_Ï‚»

Wypróbuj online!

Wyjaśnienie

U                                            # store the answer key in X
 |3ô                                         # split the question-rows in chunks of 3
    ø`                                       # zip and flatten
      \                                      # discard top of stack, leaving the list of
                                             # answer rows on top
       v                                     # for each answer row
         y'|k                                # get the index of the first "|"
        y    >è                              # get the character after that from the row
               XNèQ                          # compare it to the corresponding entry in 
                                             # the answer key
                   ˆ                         # add it to the global list
                    }                        # end loop
                     ¯O                      # calculate the number of correct answers
                       Xg/                   # divide by the length of the answer key
                          3°*                # multiply by 1000
                             2z+             # add 0.5
                                ï            # convert to integer
                                 T/          # divide by 10
                                   XgL       # push range [1 ... len(answer key)]
                                      ¯_Ï    # keep only numbers corresponding to 
                                             # wrong answers
                                          ‚» # format output

Skumulowane , 68 + 1 = 69 bajtów

'|'split[#'1-]NO neq::size:@z~>*[]YES' '#`out is0 sum z/100*1 nround

Wypróbuj online! +1 dla -pflagi (ten skrypt można wykonać jako stacked -pe "...")

Pobiera dwa wejścia z góry stosu.

Kilka interesujących funkcji:

[#'1-]NO
[    ]NO   do not keep members where
 #'          its length
   1-          -1
             is truthy (in this case, not equal to zero).

Daje to wszystkie litery otoczone rurami.

:size:@z~>*[]YES
:                 duplicate indices of incorrect answers
 size             length of incorrect answers
     :@z          (stored into z)
        ~>        range from 1 to this length
          *       and multiply by this range
           []YES  keep truthy elements

To daje nam wszystkie nieprawidłowe numery pytań.

Python 2 , 94 93 bajty

^{-1 bajt dzięki L3viathan}

s,a=input()
l=len(s)
w=[i+1for i in range(l)if"|%s|"%a[i]not in s[i]]
print(l-len(w))*1e2/l,w

Wypróbuj online!

Pip , 49 46 44 48 45 bajtów

Ugh, to zaokrąglanie zajmuje tyle bajtów ... 44 bajtów kodu, +1 dla -sflagi.

(/2+m-m/#b*#P_FI{++nbNa?un}MZa@`\|..`b)//1/t

Pobiera dane wejściowe jako argumenty wiersza poleceń (strona scan-tron będzie wymagać cytowania i zmiany znaczenia nowych linii, jeśli uruchomisz ją z rzeczywistego wiersza poleceń). Najpierw wysyła pominięte pytania, a następnie wynik. Wypróbuj online!

Wyjaśnienie

Zrobię to w dwóch częściach: lista nieprawidłowych pytań i wynik.

P_FI{++nbNa?un}MZa@`\|..`b
                            a,b are cmdline args, u is nil, n is newline (implicit)
                            Note that a string like n, in math contexts, is equivalent to 0
                 a@`\|..`   Find all occurrences in a of | followed by 2 chars
                            Because regex matches don't overlap, this does what we need
    {         }MZ        b  Zip with b and map this function to each pair of items:
     ++n                     Increment n (so the first time through, it's 1)
        bNa                  Is 2nd arg a substring of 1st?
           ?un               If so, return nil; if not, return n
                            Now we have a list containing nil for correct questions
                            and the question number for incorrect questions
 _FI                        Filter on identity function (keep only truthy values)
P                           Print, joining on spaces (-s flag)

(/2+m-m/#b*#...)//1/t
                       a,b are cmdline args, m is 1000 (implicit)
            ...        The code from the first part
           #           Length of that list (i.e. number of incorrect questions)
      m/#b*            Times 1000/(number of questions)
    m-                 Subtracted from 1000
 /2+                   Plus 1/2 (= 0.5)
                       We now have a number like 667.1666666666667
(              )//1    Int-divide by 1 to truncate
                   /t  and divide that by 10
                       Print (implicit)

JavaScript (ES6), 88 bajtów

x=>y=>x.replace(/\w(?=\|)/g,c=>c==y[i++]?t++:a+=i+" ",a=i=t="")&&(t/i*1e3+.5|0)/10+`
`+a

Mógłbym zapisać 5 bajtów, używając przecinków i zwracając wszystko w jednym wierszu:

x=>y=>x.replace(/\w(?=\|)/g,c=>c==y[i++]?t++:a+=[,i],a=i=t="")&&(t/i*1e3+.5|0)/10+a

Partia, 242 bajty

@echo off
set/as=c=0
set m=
set/pk=
:l
set/ac+=1
set/pt=
set/pl=
set/pt=
set "l=%l:*|=%
if %l:~,1%==%k:~,1% (set/as+=1)else set m=%m% %c%
set k=%k:~1%
if not "%k%"=="" goto l
set/as=(s*2000/c+1)/2
echo(%s:~,-1%.%s:~-1%
echo(%m%

Najpierw wczytuje klucz odpowiedzi na STDIN, a następnie n*3wiersze pytań. Uwaga: Wynik jest drukowany bez wiodącego zera, jeśli jest mniejszy niż 1.0. Nieodebrane odpowiedzi są drukowane z wiodącą spacją.

CJam , 47 45 bajtów

lqN/(;3%_'|f#:).=.=__:+\,d/e2XmOn:!_,,:).*0-p

Wypróbuj online!

Wyjaśnienie

Program składa się z trzech głównych części:

Right/wrong list

l                    e# Read the first line of input (answer key)
 qN/                 e# Read the rest of the input and split it on newlines
    (;3%             e# Delete the first line, then select every 3rd line 
        _            e# Duplicate the array
         '|f#        e# Find the index of the first | in each answer
             :)      e# Increment each, gives the index of the selected letter for each answer
               .=    e# Vectorized get-element-at with the answer strings
                 .=  e# Vectorized equality check with the answer key

Po tej sekcji mamy tablicę 0s i 1s, gdzie 0oznacza złą odpowiedź i 1właściwą odpowiedź.

Score

__              e# Duplicate the right/wrong list twice
  :+            e# Take the sum of it (number of right answers)
    \,          e# Swap top elements and take the length (total number of questions)
      d/        e# Divide (casting to double so it's not integer division)
        e2      e# Multiply by 10^2
          XmO   e# Round to 1 decimal place
             n  e# Pop and print with a newline

Po tej sekcji stos zawiera tylko listę dobrych / złych, a wynik procentowy został wyprowadzony.

Wrong answers

:!            e# Logically negate each element of the right/wrong list
  _,,:)       e# Generate the inclusive range 1...length(list)
       .*     e# Vectorized multiplication of the two lists
         0-   e# Remove any 0s from the result
           p  e# Print it

Jolf, 46 bajtów

Nie mogę złamać 46 bajtów. Mam dwa rozwiązania tej długości. Wypróbuj tutaj!

ΆRγψ~mΖ mi«\|..»d?=€H.xSEhSdHήSmX*~1/-lζlγlζ_1

(Wymienić □z 0x7fw następnym)

ΆRγψΜΖψGi'|d=1lHd?□=H.xShSEdHήSmX*~1/-lζlγlζ_1

W obu przypadkach 15 bajtów dla zaokrągleń: mX*~1/-lζlγlζ_1. Są one w większości takie same, z wyjątkiem tego, że jeden używa dopasowania wyrażenia regularnego, aby uzyskać wyniki, a drugi dzieli na potokach.