Haskell 程序用于查找长方体的表面积和体积


本教程讨论了编写一个程序,用于在 Haskell 编程语言中查找长方体的表面积和体积。

长方体是一种具有六个矩形面的立体图形。长方体具有三个维度:长、宽和高。长方体的表面积是六个矩形面的总面积,即 2*长*宽 + 2*长*高 + 2*宽*高。长方体的体积是长*宽*高。因为体积等于面积*高。

在本教程中,我们将看到:

  • 查找长方体表面积的程序。
  • 查找长方体体积的程序。

算法步骤

  • 获取输入或初始化变量。
  • 实现计算长方体表面积和体积的程序逻辑。
  • 打印或显示表面积和体积。

示例 1

查找长方体表面积的程序。

-- function declaration
surfaceArea :: Float->Float->Float->Float
-- function definition
surfaceArea a b h = 2*a*b + 2*a*h + 2*b*h
main = do
-- declaring and initializing variables
   let a = 5
   let b = 4
   let h = 3
-- computing the surface area
   let area = surfaceArea a b h
-- printing the surface area
   print ("The surface area of a cuboid with length, breadth, and height as " ++ show a ++ ", "++show b ++ ", and " ++ show h ++" is:")
   print (area)

输出

"The surface area of a cuboid with length, breadth, and height as 5.0, 4.0, and 3.0 is:"
94.0

在上面的程序中,我们声明了一个名为 surfaceArea 的函数,它接受三个浮点数作为参数并返回一个浮点数。在其函数定义中,接受了三个参数 a、b 和 h。其中 a、b 和 h 分别代表长、宽和高。计算并返回表面积。在主函数中,声明了三个用于存储长方体长、宽和高的变量 a、b 和 c,并分别初始化为 5、4 和 3。使用这些初始化的变量作为参数调用 surfaceArea 函数。由于此函数返回长方体的表面积,因此返回的输出将加载到变量 area 中。最后,使用 print 函数打印长方体的表面积。

注意 - show 函数接受一个数字作为参数并返回该数字的解析字符串。“++” 是 Haskell 中用于连接字符串的操作符。

示例 2

查找长方体体积的程序。

-- function declaration
volume :: Float->Float->Float->Float
-- function definition
volume a b h = a*b*h
main = do
-- declaring and initializing variables
   let a = 5
   let b = 4
   let h = 3
-- computing the volume
   let vol = volume a b h
-- printing the volume
   print ("The volume of a cuboid with length, breadth, and height as " ++ show a ++ ", "++show b ++ ", and " ++ show h ++" is:")
   print (vol)

输出

"The volume of a cuboid with length, breadth, and height as 5.0, 4.0, and 3.0 is:"
60.0

在上面的程序中,我们声明了一个名为 volume 的函数,它接受三个浮点数作为参数并返回一个浮点数。在其函数定义中,接受了三个参数 a、b 和 h。其中 a、b 和 h 分别代表长、宽和高。计算并返回体积。在主函数中,声明了三个用于存储长方体长、宽和高的变量 a、b 和 c,并分别初始化为 5、4 和 3。使用这些初始化的变量作为参数调用 volume 函数。由于此函数返回长方体的体积,因此返回的输出将加载到变量 vol 中。最后,使用 print 函数打印长方体的表面积。

结论

在本教程中,我们讨论了在 Haskell 编程语言中实现查找长方体表面积和体积的程序。

更新于:2022-12-14

220 次浏览

开启你的 职业生涯

通过完成课程获得认证

立即开始
广告

© . All rights reserved.