Code Submission Evaluation System Login

Datatähti 2018 alku

Start:2017-10-02 00:00:00
End:2017-10-16 00:00:00
 

Tasks | Messages | Scoreboard | Statistics


CSES - Datatähti 2018 alku - Results
History
2017-10-08 15:39:420
2017-10-03 16:12:160
2017-10-02 09:51:41100
Task:Merkkijono
Sender:FSMnArmosta
Submission time:2017-10-02 09:51:41
Language:Haskell
Status:READY
Score:100

Feedback

groupverdictscore
#1ACCEPTED

Test results

testverdicttime (s)
#1ACCEPTED0.04 / 1.00details
#2ACCEPTED0.04 / 1.00details
#3ACCEPTED0.03 / 1.00details
#4ACCEPTED0.04 / 1.00details
#5ACCEPTED0.05 / 1.00details
#6ACCEPTED0.05 / 1.00details
#7ACCEPTED0.04 / 1.00details
#8ACCEPTED0.04 / 1.00details
#9ACCEPTED0.05 / 1.00details
#10ACCEPTED0.04 / 1.00details

Compiler report

input/code.hs:2:1: Warning:
    Top-level binding with no type signature:
      chop :: forall a. Eq a => [a] -> a -> [a]

input/code.hs:2:9: Warning: Defined but not used: `a'

input/code.hs:5:1: Warning:
    Top-level binding with no type signature:
      body :: forall a. Eq a => [a] -> [a] -> [a]

Code

chop [] a = []
chop (first:rest) a = if first == a then (chop rest a) else (first:rest)

body before [] = before
body [] (now:after) = body [now] after
body (latest:before) (now:after) = if now == latest then body (chop before latest) (chop after now) else body (now:latest:before) after

main :: IO ()
main = do
    text <- getLine
    putStrLn (reverse (body [] text))

Test details

Test 1

Verdict: ACCEPTED

input
ABABABABABABABABABABABABABABAB...
view   save

correct output
ABABABABABABABABABABABABABABAB...
view   save

user output
ABABABABABABABABABABABABABABAB...
view   save

Test 2

Verdict: ACCEPTED

input
AABBAABBAABBAABBAABBAABBAABBAA...
view   save

correct output
(no output)
view   save

user output
(no output)
view   save

Test 3

Verdict: ACCEPTED

input
ABABABABABABABABABABABABABABAB...
view   save

correct output
(no output)
view   save

user output
(no output)
view   save

Test 4

Verdict: ACCEPTED

input
BBABABBBBBAABBBABABABBBBAAABAB...
view   save

correct output
BAB
view   save

user output
BAB
view   save

Test 5

Verdict: ACCEPTED

input
ACDCBBACDBBBACAACBBDBADBAABABA...
view   save

correct output
ACDCACDADBADABACACDCADADABABCA...
view   save

user output
ACDCACDADBADABACACDCADADABABCA...
view   save

Test 6

Verdict: ACCEPTED

input
EETFHIJOGACDHMGVFJCMETMZDEITTR...
view   save

correct output
TFHIJOGACDHMGVFJCMETMZDEIROTET...
view   save

user output
TFHIJOGACDHMGVFJCMETMZDEIROTET...
view   save

Test 7

Verdict: ACCEPTED

input
GOONLAHLYPRFCZKIKSJWAWWYJJPCDB...
view   save

correct output
GNLAHLYPRFCZKIKSJWAYPCDNWYMRCE...
view   save

user output
GNLAHLYPRFCZKIKSJWAYPCDNWYMRCE...
view   save

Test 8

Verdict: ACCEPTED

input
PISHWMOTCDDZFRMYMOMYDYYGJZIQHS...
view   save

correct output
PISHWMOTCZFRMYMOMYDGJZIQHSVAOK...
view   save

user output
PISHWMOTCZFRMYMOMYDGJZIQHSVAOK...
view   save

Test 9

Verdict: ACCEPTED

input
QUVVTPXAMWWODFXRONJODPGBTCISGM...
view   save

correct output
QUTPXAMODFXRONJODPGBTCISGMVRBW...
view   save

user output
QUTPXAMODFXRONJODPGBTCISGMVRBW...
view   save

Test 10

Verdict: ACCEPTED

input
POXHAHYEZTLYNFSLABODMRNKDSKROZ...
view   save

correct output
POXHAHYEZTLYNFSLABODMRNKDSKROZ...
view   save

user output
POXHAHYEZTLYNFSLABODMRNKDSKROZ...
view   save