Anonymous user
Arithmetic/Integer: Difference between revisions
no edit summary
No edit summary |
|||
Line 89:
cr ." a/b=" /mod .
cr ." a mod b = " . cr ;
==[[Haskell]]==
[[Category:Haskell]]
main = do
as <- getLine
bs <- getLine
let
a :: Integer
a = read as
b :: Integer
b = read bs
putStrLn $ "a + b = " ++ show (a + b)
putStrLn $ "a - b = " ++ show (a - b)
putStrLn $ "a * b = " ++ show (a * b)
putStrLn $ "a / b = " ++ show (a `div` b)
==[[Pascal]]==
| |||