Submission #1127340
Source Code Expand
module Main where import Control.Monad import Control.Applicative import Data.Maybe import Data.List import qualified Text.Printf import qualified Data.ByteString.Char8 as BC import qualified Data.ByteString as BC ------------------------------------------ main :: IO () main = do [sx, sy, tx, ty] <- readInts replicateM_ (tx-sx) $ putStr "R" replicateM_ (ty-sy) $ putStr "U" replicateM_ (tx-sx) $ putStr "L" replicateM_ (ty-sy+1) $ putStr "D" replicateM_ (tx-sx+1) $ putStr "R" replicateM_ (ty-sy+1) $ putStr "U" putStr "L" putStr "U" replicateM_ (tx-sx+1) $ putStr "L" replicateM_ (ty-sy+1) $ putStr "D" putStrLn "R" ------------------------------------------ {- Int input -} parseInt :: BC.ByteString -> Int parseInt = fst . fromJust . BC.readInt parseInts :: BC.ByteString -> [Int] parseInts = map parseInt <$> BC.words readInt :: IO Int readInt = parseInt <$> BC.getLine readInts :: IO [Int] readInts = parseInts <$> BC.getLine {- Double Formatting -} doubleFmt :: Double -> String doubleFmt = Text.Printf.printf "%.12f"
Submission Info
Submission Time | |
---|---|
Task | C - Back and Forth |
User | lrmystp |
Language | Haskell (GHC 7.10.3) |
Score | 300 |
Code Size | 1106 Byte |
Status | AC |
Exec Time | 6 ms |
Memory | 1020 KB |
Judge Result
Set Name | Sample | All | ||||
---|---|---|---|---|---|---|
Score / Max Score | 0 / 0 | 300 / 300 | ||||
Status |
|
|
Set Name | Test Cases |
---|---|
Sample | sample_01.txt, sample_02.txt |
All | sample_01.txt, sample_02.txt, subtask_1_01.txt, subtask_1_02.txt, subtask_1_03.txt, subtask_1_04.txt, subtask_1_05.txt, subtask_1_06.txt, subtask_1_07.txt, subtask_1_08.txt, subtask_1_09.txt, subtask_1_10.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
sample_01.txt | AC | 1 ms | 508 KB |
sample_02.txt | AC | 1 ms | 508 KB |
subtask_1_01.txt | AC | 1 ms | 508 KB |
subtask_1_02.txt | AC | 6 ms | 1020 KB |
subtask_1_03.txt | AC | 4 ms | 1020 KB |
subtask_1_04.txt | AC | 3 ms | 1020 KB |
subtask_1_05.txt | AC | 3 ms | 1020 KB |
subtask_1_06.txt | AC | 2 ms | 764 KB |
subtask_1_07.txt | AC | 1 ms | 636 KB |
subtask_1_08.txt | AC | 3 ms | 892 KB |
subtask_1_09.txt | AC | 3 ms | 1020 KB |
subtask_1_10.txt | AC | 2 ms | 1020 KB |