#640111 (Haskell) No.8077 🔧

• 問題: No.8077 🔧
• ユーザー: zer0-star
• 提出日時: 2021-04-01 21:04:04
• 言語: Haskell (9.10.1)
• 結果: AC
• 実行時間: 2 ms / 2,000 ms
• コード長: 138 bytes
• コンパイル時間: 11,486 ms
• コンパイル使用メモリ: 173,312 KB
• 実行使用メモリ: 6,820 KB
• 最終ジャッジ日時: 2024-12-21 05:00:55
• 合計ジャッジ時間: 11,724 ms
• ジャッジサーバーID （参考情報）: judge4 / judge5

ファイルパターン	結果
sample	AC * 3
other	AC * 10

コンパイルメッセージ

Loaded package environment from /home/judge/.ghc/x86_64-linux-9.8.2/environments/default
[1 of 2] Compiling Main             ( Main.hs, Main.o )
[2 of 2] Linking a.out

ソースコード

1
2
3
4
{-# LANGUAGE TypeApplications #-}
main = do
  [a, b, c, d, k] <- map (read @Integer) . words <$> getLine
  print $ (a * b + c - d) `mod` k
 
 
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX