Haskell程式計算立方體面積

---

本教程將幫助我們計算立方體的表面積。計算表面積的方法有很多，但計算表面積的數學公式保持不變，即 6*(邊長^2)。

方法一：使用cubeArea函式

此示例定義了一個函式cubeArea，它接受一個引數（立方體邊的長度），並返回立方體的表面積。main函式呼叫cubeArea函式來計算面積。然後將結果列印到控制檯。

演算法

• 步驟1 − 基於簡單的數學公式 6a^2 定義函式cubeArea，即 cubeArea side = 6 * (side ^ 2)。

• 步驟2 − 程式執行將從main函式開始。main()函式控制整個程式。它寫成 main = do。

• 步驟3 − 初始化一個名為“side”的變數。它將包含立方體邊的長度。

• 步驟4 − 初始化一個名為“area”的變數來儲存計算出的立方體表面積值，並使用‘putStrLn’語句顯示最終結果。

示例

在這個示例中，我們將使用cubeArea函式計算立方體的表面積。

module Main where
cubeArea :: Double -> Double
cubeArea side = 6 * (side ^ 2)
main :: IO ()
main = do
   let side = 4
   let area = cubeArea side
   putStrLn ("The area of the cube is: " ++ show area)

輸出

The area of the cube is: 96.0

方法二：使用Data.Fixed

在此方法中，使用Data.Fixed庫以固定的精度表示立方體的邊長。Fixed E2型別用於表示具有2位小數的定點小數。

cubeArea函式接受一個Fixed E2型別的引數，它表示立方體邊的長度。然後它透過將邊長乘以6並將其平方來計算立方體的表面積。

演算法

• 步驟1 − 匯入Data.Fixed模組。

• 步驟2 − 定義函式cubeArea，它接受一個Fixed E2型別的引數，表示立方體邊的長度。然後它透過將邊長乘以6並將其平方來計算立方體的表面積。

• 步驟3 − 程式執行將從main函式開始。main()函式控制整個程式。它寫成 main = do。

• 步驟4 − 初始化一個名為“side”的變數。它將包含立方體邊的長度。

• 步驟5 − 初始化一個名為“area”的變數，在呼叫函式後儲存計算出的立方體表面積值，並使用‘putStrLn’語句顯示最終結果。

示例

在這個示例中，我們將使用Data.Fixed以固定的精度表示邊長來計算立方體的表面積。

import Data.Fixed
cubeArea :: Fixed E2 -> Fixed E2
cubeArea side = 6 * (side ^ 2)
main :: IO ()
main = do
   let side = 4
   let area = cubeArea side
   putStrLn ("The area of the cube is: " ++ show area)

輸出

The area of the cube is: 96.00

方法三：使用模式匹配

此方法使用記錄語法定義了一個數據型別Cube，它有一個名為side的欄位，型別為Double。

cubeArea函式接受一個Cube型別的引數，並使用模式匹配提取side欄位的值。然後它透過將邊長乘以6並將其平方來計算立方體的表面積。

演算法

• 步驟1 − 使用記錄語法定義資料型別Cube。

• 步驟2 − 定義cubeArea函式，它接受一個Cube型別的引數，並使用模式匹配提取side欄位的值。然後它透過將邊長乘以6並將其平方來計算立方體的表面積。

• 步驟3 − 程式執行將從main函式開始。main()函式控制整個程式。

• 步驟4 − 初始化一個名為“side”的變數。它將包含立方體邊的長度。

• 步驟5 − 初始化一個名為“area”的變數，在呼叫函式後儲存計算出的立方體表面積值，並使用‘putStrLn’語句顯示最終結果。

示例

在下面的示例中，我們將使用模式匹配來計算立方體的表面積。

data Cube = Cube { side :: Double }
cubeArea :: Cube -> Double
cubeArea (Cube side) = 6 * (side ^ 2)
main :: IO ()
main = do
   let side = 4
   let area = cubeArea (Cube side)
   putStrLn ("The area of the cube is: " ++ show area)

輸出

The area of the cube is: 96.0

結論

計算立方體表面積的方法有很多。在Haskell中，可以使用cubeArea函式、Data.Fixed庫或模式匹配來計算立方體的表面積。