Submission #1694913
Source Code Expand
import qualified Data.ByteString.Char8 as BC import Data.Maybe (fromJust) import Control.Monad --import Data.Sequence import Prelude import System.IO import Data.List -- a <- replicateM n readLn -- mapM_ print $ main = do n <- readLn a <- replicateM n getLine putStrLn $ solve a solve :: [String] -> String solve a = connect $ take 2 $ sort a connect :: [String] -> String connect (a:b) = a ++ (head b) -- リストに関数を適用する。map だと1変数関数しか使えない悲しみ。 --map' :: ([Int] -> Int -> Int -> Int) -> [Int] -> [Int] -> [Int] map' _ _ [] = [] map' f a (i:is) = f a i 0 : map' f a is -- t と等しい最初の要素の index を返す。あとで直す search :: [Int] -> Int -> Int -> Int search a t i = if a!!i == t then i else search a t (i + 1)
Submission Info
Submission Time | |
---|---|
Task | B - パスワード |
User | noy72 |
Language | C++14 (GCC 5.4.1) |
Score | 0 |
Code Size | 843 Byte |
Status | CE |
Compile Error
./Main.cpp:23:1: error: stray ‘\343’ in program -- リストに関数を適用する。map だと1変数関数しか使えない悲しみ。 ^ ./Main.cpp:23:1: error: stray ‘\203’ in program ./Main.cpp:23:1: error: stray ‘\252’ in program ./Main.cpp:23:1: error: stray ‘\343’ in program ./Main.cpp:23:1: error: stray ‘\202’ in program ./Main.cpp:23:1: error: stray ‘\271’ in program ./Main.cpp:23:1: error: stray ‘\343’ in program ./Main.cpp:23:1: error: stray ‘\203’ in program ./Main.cpp:23:1: error: stray ‘\210’ in program ./Main.cpp:23:1: error: stray ‘\343’ in program ./Main.cpp:23:1: error: stray ‘\201’ in program ./Main.cpp:23:1: error: stray ‘\253’ in program ./Main.cpp:23:1: error: stray ‘\351’ in program ./Main.cpp:23:1: error: stray ‘\226’ in program ./Main.cpp:23:1: error: stray ‘\242’ in program ./Main.cpp:23:1: error: stray ‘\346’ in program ./Main.cpp:23:1: error: stray ‘\225’ in program ./Main.cpp:23:1: error: stray ‘\260’ in program ./Main.cpp:23:1: error: stray ‘\343’ in program ./Main.cpp:23:1: error: stray ‘\202’ in program ./Main.cpp:23:1: error...