Haskell程序 计算菱形面积

Haskell程序 计算菱形面积

在Haskell中,有不同的方法来计算菱形的面积。我们可以使用边、对角线和高度,在此基础上,它的面积可以通过不同的方法计算出来。

算法

  • 第1步– 导入Text.Printf模块。

  • 第2步– 定义了菱形函数

  • 第3步 – 程序执行将从主函数开始。main()函数拥有整个程序的控制权。它被写成main = do。它将两个整数作为对角线,并使用rhombusArea函数打印出面积。

  • 第4步 – 变量 “d1 “和 “d2 “被初始化。它将保存这两个整数作为菱形的对角线。

  • 第5步 – 菱形的结果面积用’printf’函数打印到控制台。printf函数用于将输出格式化为两位小数。

例子1

在这个例子中,定义了一个函数rhombusArea,以菱形的两条对角线为参数,用公式(d1 * d2) / 2返回面积。

import Text.Printf

rhombusArea :: Double -> Double -> Double
rhombusArea d1 d2 = (d1 * d2) / 2

main :: IO ()
main = do
   let d1 = 4
   let d2 = 5

   let area = rhombusArea d1 d2
   printf "Area of the rhombus: %.2f" area

输出

Area of the rhombus: 10.00

例2

在这个例子中,菱形的边长被作为输入,用于计算面积的公式是(s1*s2)/2。

import Text.Printf

rhombusArea :: Double -> Double -> Double
rhombusArea s1 s2 = (s1 * s2) / 2

main :: IO ()
main = do
   let s1 = 4
   let s2 = 5
   let area = rhombusArea s1 s2
   printf "Area of the rhombus: %.2f" area

输出

Area of the rhombus: 10.00

例3

在这个例子中,菱形的一条边的长度和高度被作为输入,然后用公式s*h来计算面积。

import Text.Printf

rhombusArea :: Double -> Double -> Double
rhombusArea s h = s * h

main :: IO ()
main = do
   let s = 4
   let h = 5

   let area = rhombusArea s h
   printf "Area of the rhombus: %.2f" area

输出

Area of the rhombus: 20.00

结论

菱形的面积在Haskell中可以通过使用其对角线;边;或使用一个边和高度来计算。在调用定义的函数时,使用’printf’函数将面积打印到控制台。

Python教程

Java教程

Web教程

数据库教程

图形图像教程

大数据教程

开发工具教程

计算机教程