Проверить тест по ключу
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 | * Допустим, следующие данные - результаты некоторого теста. Допустим также, что корректные варианты ответов на вопросы с I1 по I10 таковы: 3 5 2 3 2 5 4 4 4 2. Для проверки теста можно использовать следующий синтаксис. DATA LIST /I1 to I10 1-10 (F) COMMENT 14-60 (A). BEGIN DATA 2315441435 3234254515 4254352353 1543254451 4554215323 5455315435 2132234332 3523254442 Полностью ПРАВИЛЬНЫЙ результат 2462142551 Полностью НЕПРАВИЛЬНЫЙ результат END DATA . SAVE OUTFILE 'c:\\temp\\RAW.SAV'. DATA LIST / X1 TO X10 1-10. BEGIN DATA 3523254442 END DATA . MATCH FILES FILE 'c:\\temp\\RAW.SAV' /FILE * . LEAVE X1 TO X10. COMPUTE TOTAL = 0. DO REPEAT ITEM = I1 TO I10 / CORRECT = X1 TO X10. COMPUTE TOTAL = TOTAL + (ITEM = CORRECT) . END REPEAT. MATCH FILES FILE * / DROP X1 TO X10. LIST. * В переменной TOTAL содержится число верных ответов. |