การใช้งาน For Loop ในภาษา Haskell แบบง่ายๆ

การเขียนโปรแกรมมีหลายภาษาที่เราใช้ในการสร้างแอปพลิเคชันหรือสคริปต์ต่าง ๆ ซึ่ง Haskell เป็นหนึ่งในภาษาที่มีลักษณะพิเศษ เนื่องจากเป็นภาษาฟังก์ชัน (Functional Programming) ซึ่งทำให้การใช้ประโยชน์จากการวนลูป (Looping) อาจจะแตกต่างจากภาษาที่เน้นโอเบเจ็กต์ (Object-Oriented) หรือของจริงทั่วไป เช่น Python หรือ Java

ในภาษา Haskell นั้นเราไม่สามารถใช้ `for loop` ได้ตรง ๆ เหมือนในภาษาอื่น ๆ อย่างไรก็ตาม เราสามารถสร้างฟังก์ชันที่คล้ายกันได้ด้วยการใช้ `map`, `fold`, หรือการคืนค่าลิสต์ (List Comprehensions)

การทำงานพื้นฐานของ For Loop ใน Haskell

ใน Haskell ทำให้เราเข้าใจหลักการทำงานของ For Loop ผ่านการสร้างฟังก์ชันที่ใช้งานกับลิสต์ได้ เนื่องจาก Haskell เน้นการประมวลผลข้อมูลเป็นลิสต์เป็นหลัก คุณไม่จำเป็นต้องสร้างลูปแบบดั้งเดิม ๆ หรือใช้คำสั่งสามัญเช่น `for` หรือ `while`

ตัวอย่างการใช้งาน For Loop

เราจะเริ่มด้วยการสร้างฟังก์ชันเล็กๆ เพื่อตรวจสอบว่าค่าในลิสต์แต่ละตัว คือ จำนวนคู่หรือไม่ ดังนี้:

 isEven :: Int -> Bool
isEven x = x `mod` 2 == 0

checkEvens :: [Int] -> [Bool]
checkEvens nums = map isEven nums

main :: IO ()
main = do
    let numbers = [1..10]
    let results = checkEvens numbers
    print results

คำอธิบาย

- ฟังก์ชัน `isEven` เป็นฟังก์ชันที่ใช้ตรวจสอบว่า จำนวน x เป็นจำนวนคู่หรือไม่

- `checkEvens` จะใช้ฟังก์ชัน `map` เพื่อทำงานร่วมกับลิสต์ โดยจะเรียกใช้ `isEven` กับค่าใน `nums` แต่ละตัว

- `main` คือจุดเริ่มต้นของโปรแกรม โดยเราสร้างลิสต์จากเลข 1 ถึง 10 และส่งให้ฟังก์ชัน `checkEvens` เพื่อตรวจสอบค่าต่าง ๆ ท้ายที่สุดเราจะพิมพ์ผลลัพธ์ออกมาทางหน้าจอ

ผลลัพธ์ที่ได้

เมื่อดำเนินการโปรแกรมนี้ จะได้ผลลัพธ์ดังนี้:

 [False,True,False,True,False,True,False,True,False,True]

ซึ่งแสดงว่าเลข 1, 3, 5, 7, 9 เป็นจำนวนคี่ และ 2, 4, 6, 8, 10 เป็นจำนวนคู่

Use Case ในโลกจริง

1. การวิเคราะห์ข้อมูล

ในโลกแห่งการวิเคราะห์ข้อมูล เรามักต้องการตรวจสอบข้อเท็จจริงเกี่ยวกับข้อมูลจำนวนมาก เช่น ตรวจสอบว่า มูลค่าไม่ได้เป็นศูนย์หรือไม่ เช่นแสดงว่า ผู้ใช้มีการซื้อสินค้าหรือไม่ โดยใช้การวนลูปเหมือนที่เราเห็นในตัวอย่างก่อนหน้านี้:

 hasPurchases :: [Int] -> [Bool]
hasPurchases purchases = map (\x -> x > 0) purchases

2. การจัดอันดับ

ถ้าหากคุณต้องการตรวจสอบค่าที่สูงที่สุดในชุดของข้อมูล การใช้ลิสต์และฟังก์ชัน `filter` หรือ `map` สามารถช่วยจัดอันดับข้อมูลได้

 topScores :: [Int] -> [Int]
topScores scores = filter (>80) scores  -- เลือกเฉพาะคะแนนที่สูงกว่า 80

3. การทำงานชุดของการคำนวณ

ในหลายๆ แอปพลิเคชัน ทั้งการคำนวณทางการเงินหรือการสร้างกราฟฟิก ฟังก์ชันที่ใช้วนลูปสามารถช่วยในการคำนวณค่าเฉลี่ยหรือปรับเปลี่ยนสิ่งต่าง ๆ ในลิสต์ได้อย่างมีประสิทธิภาพ

 average :: [Double] -> Double
average list = sum list / fromIntegral (length list)

main :: IO ()
main = do
    let grades = [85.0, 90.0, 75.0, 80.0]
    print $ average grades

สรุป

การใช้ For Loop ในภาษา Haskell ไม่ได้มีลักษณะการทำงานที่ชัดเจนเทียบเท่ากับภาษาที่ใช้คำสั่งอย่างจุดประสงค์ที่เราคุ้นเคย แต่เรายังสามารถนำนามธรรมของการวนลูปมาประยุกต์ใช้ในกลุ่มฟังก์ชันต่าง ๆ ที่สามารถทำให้งานของเราง่ายขึ้นได้

ในฐานะที่เป็นนิสิตนักศึกษาโปรแกรมมิ่ง คุณสามารถพัฒนาทักษะการเขียนโปรแกรม Haskell ได้ที่ EPT (Expert-Programming-Tutor) ซึ่งเรามีการเรียนการสอนที่หลากหลายและเหมาะกับทุกระดับ ทั้งเพื่อให้คุณเข้าสู่โลกของการพัฒนาซอฟต์แวร์อย่างมั่นใจและมีความเชี่ยวชาญ!

เราหวังว่าบทความนี้จะช่วยให้คุณเข้าใจการใช้งาน For Loop ใน Haskell ได้ดีขึ้น ถ้าหากคุณสนใจเรียนรู้ลึกซึ้งในด้านการเขียนโปรแกรม Haskell และด้านฟังก์ชันอื่น ๆ อย่าลืมเข้าร่วมเรียนกับเราได้ที่ EPT กันนะ!

หมายเหตุ: ข้อมูลในบทความนี้อาจจะผิด โปรดตรวจสอบความถูกต้องของบทความอีกครั้งหนึ่ง บทความนี้ไม่สามารถนำไปใช้อ้างอิงใด ๆ ได้ ทาง EPT ไม่ขอยืนยันความถูกต้อง และไม่ขอรับผิดชอบต่อความเสียหายใดที่เกิดจากบทความชุดนี้ทั้งทางทรัพย์สิน ร่างกาย หรือจิตใจของผู้อ่านและผู้เกี่ยวข้อง