如何从命令行输入两个整数并返回平方和的平方根

Question

我正在尝试开始学习 Haskell。我想从命令行输入两个数字并返回每个数字平方和的平方根。这就是勾股定理

当然，我想我会在某个地方找到一个示例，所以我可以集中精力接受一些输入，将输入传递给一个函数，返回它，然后将结果打印出来。试图解决这个简单的案例。 PHP / Javascript 程序员，想学习函数式编程，所以我现在正在学习 Martian。对不起，如果这个问题被问过或者太简单了。当然我很接近，但我不明白我错过了什么。我知道 sqrt 会返回一个浮点数。

module Main where

hypotenuse a b = sqrt $ a * a + b * b
main :: IO ()
main = do
  input1 <- getLine
  input2 <- getLine
  let a = read input1 :: Int
  let b = read input2 :: Int
  print $ hypotenuse a b

这会返回一个错误：

没有因使用“斜边”而产生的 (Floating Int) 实例， 第 10 行，第 11 个字符

斜边中的“h”在我的 Atom 编辑器 IDE 中突出显示。使用 ghc-mod 插件进行检查。

更新： @peers 回答解决了我的问题...

感谢stackoverflow.com，我的第一个haskell程序https://github.com/jackrabbithanna/haskell-pythagorean-theorem

Answer 1

sqrt 需要类型为 Floating 的输入，但您提供的 Ints 不会实例化 Floating。 在 ghci 中，您可以看到 sqrt 和 :t sqrt 的类型签名。它是sqrt :: Floating a => a -> a。
Int 实现了几个类型类，如:info Int 所示：

instance Eq Int -- Defined in ‘GHC.Classes’
instance Ord Int -- Defined in ‘GHC.Classes’
instance Show Int -- Defined in ‘GHC.Show’
instance Read Int -- Defined in ‘GHC.Read’
instance Enum Int -- Defined in ‘GHC.Enum’
instance Num Int -- Defined in ‘GHC.Num’
instance Real Int -- Defined in ‘GHC.Real’
instance Integral Int -- Defined in ‘GHC.Real’
instance Bounded Int -- Defined in ‘GHC.Enum’

但Floating不在其中。
尝试将reading 为Double 或将Ints 转换为fromIntegral。

代码中的两种方式：

module Main where

hypotenuse a b = sqrt $ a * a + b * b
main :: IO ()
main = do
  input1 <- getLine
  input2 <- getLine
  let a = read input1 :: Double
  let b = read input2 :: Int
  print $ hypotenuse a (fromIntegral b)