ไฝ็บไธๅๅจ SEO ๅๆๅฐ้ ๅๆๆ่ฑๅฏ็ถ้ฉ็ Haskell ้็ผไบบๅก๏ผๆไบ่งฃไปฅๆๅฐ้ขจๆ ผไบคไปๅ่ฝไปฃ็ขผ็ๅฟ
่ฆๆงใ ็ทจ็จไธ็็ไธป่ฆ่ถจๅข่ๆ่ฃ็งไธ็่ถจๅข็ธๅผๆโโ็ฐกๅฎใ่ค้ๅๅตๆฐใ
ๅจๆๅ็ Haskell ๅฎๅฎไธญ๏ผไบคไบๅผ้ๅบ้กไผผๆผๆๅฐ็็ไธปๆ็ขๅ๏ผๅณ Coco Chanel ๅจ 1920 ๅนดไปฃๆจๅบ็่ๅ็โๅฐ้ป่ฃโใ ๅฎๆฏๆๅๆญฆๅจๅบซไธญ็ไธๅๅทฅๅ
ท๏ผๅฆๆไฝฟ็จๆญฃ็ขบ๏ผๅฏไปฅ็บ็กๆธไปฃ็ขผๅท่กๅ้กๆไพ่งฃๆฑบๆนๆกใ
็พๅจ๏ผ่ฎๆๅๆทฑๅ
ฅ่งฃๆฑบๆ้ ญ็ๅ้ก๏ผไบคไบๅผ้ๅบใ
ๆจกๅกMain๏ผไธป๏ผๅจๅช่ฃก
ๅฐๅ
ฅ็ณป็ตฑ.้ๅบ
ไธป่ฆ::IO()
ไธป่ฆ=ๅ
putStrLn โไฝ ๅฅฝ๏ผ ่ผธๅ
ฅไธไบๅ
งๅฎน็ถๅพๆๅฐฑๆ้ๅบใโ
userInput <- getLine putStrLn("ไฝ ่ชช๏ผ" ++ userInput) exitSuccess [/code]
ๅๆๆๅ็ Haskell ๅค่ง
ๆๅ็ Haskell ่งฃๆฑบๆนๆก๏ผๅฐฑๅ Chanel ็ๅฐ้ป่ฃไธๆจฃ๏ผ็ฐกๅฎ่ๅช้
ใ ๅฎๅ
ไฝฟ็จๅนพๅ้้ต้จๅไปฅๅพฉ้็ๆนๅผ็ตๅๅจไธ่ตทใ
ไธป่ฆๅ่ฝๅพๅ็จๆถ็ไป็ดน้ๅง๏ผ้กไผผๆผ่ท้ๆจก็น็ตฆไบบ็ไธ็็จ็น็ฌฌไธๅฐ่ฑก๏ผใ ็ถๅพ๏ผ่ฉฒๅฝๆธๆ่ซๆฑ่ผธๅ
ฅไธฆๅช้
ๅฐ่็ๅฎ๏ผๅฐฑๅๅฐๆฅญๆจก็น็็ทดๅฐ่็่กฃๆซๆ
้ไธๆจฃใ
ไบ่งฃๆดๅค