我正在尝试计算 X 数字的十进制(浮选)百分比，但我不知道该怎么做

Question

我正在尝试计算num X的%小数(浮点数)但我不知道该怎么做。

pourcentage :: Int -> Int -> Float 
pourcentage 20 100 = 20 
pourcentage n m = ( 
fromIntegral n * fromIntegral m
) / 100

但是我知道怎么用不带小数的整数值。

Answer 1

百分比公式为parttofsomething/totalSomething * 100。

我们用haskell重写一下:

percentage partOfSomething totalSomething = partOfSomething / totalSomething * 100

缩短变量名:

percentage n m = n / m * 100

指定函数的类型:

percentage :: Float -> Float -> Float
percentage n m = n / m * 100

最后归纳:

percentage :: Fractional a => a -> a -> a
percentage n m = n / m * 100