Haskell 程序获取有理数的分母

在 Haskell 中，我们可以使用 denominator、div、quot 和 gcd 函数来获取有理数的分母。在第一个示例中，我们将使用 (denominator r) 函数，在第二个示例中，我们将使用 (d `div` gcd n d) 函数。

算法

  • 步骤 1 - 导入 Data.Ratio 模块以使用 denominator 函数。

  • 步骤 2 - 程序执行将从 main 函数开始。main() 函数控制整个程序。它写成 main = do。它调用带有有理数的 denominator 函数并打印分母。

  • 步骤 3 - 初始化名为“r”的变量。它将保存要打印其分母的有理数的值。

  • 步骤 4 - 函数调用后，使用 'putStrLn' 语句将结果分母值打印到控制台。

示例 1

在这个示例中，我们将了解如何使用 denominator 函数从有理数中获取分母。

import Data.Ratio

main :: IO ()
main = do
   let r = 3 % 4
   let num = denominator r
   putStrLn $ "The denominator of " ++ show r ++ " is: " ++ show num

输出

The denominator of 3 % 4 is: 4

示例 2

在这个示例中，我们将了解如何使用 div 和 gcd 函数从有理数中获取分母。

import Data.Ratio

getdenominator :: Rational -> Integer
getdenominator r = d `div` gcd n d where
   n = numerator r
   d = denominator r

main :: IO ()
main = do
   let r = 3 % 4
   let num = getdenominator r
   putStrLn $ "The denominator of " ++ show r ++ " is: " ++ show num

输出

The denominator of 3 % 4 is: 4

示例 3

在这个示例中，我们将了解如何使用 quot 和 gcd 函数从有理数中获取分母。

import Data.Ratio

getdenominator :: Rational -> Integer
getdenominator r = denominator r `quot` gcd (numerator r) (denominator r)

main :: IO ()
main = do
   let r = 3 % 4
   let num = getdenominator r
   putStrLn $ "The denominator of " ++ show r ++ " is: " ++ show num

输出

The denominator of 3 % 4 is: 4

结论

有理数的分母是分数的底部部分。换句话说，它是分子除以的数字。

更新于: 2023-03-13

184 次浏览

开启您的 职业生涯

完成课程获得认证

立即开始
广告