Surikoff (обговорення | внесок)
Створена сторінка: 300px|thumb|left '''Haskell''' ''(солов. Хаскелль)'' - [[Функціональне пр...
 
Surikoff (обговорення | внесок)
мНемає опису редагування
Рядок 26: Рядок 26:
===Калькулятор===
===Калькулятор===


<source lang="haskell">
<!-- <source lang="haskell"> -->
  calc :: String -> Float
  calc :: String -> Float
  calc = head . foldl f [] . words
  calc = head . foldl f [] . words
Рядок 38: Рядок 38:
     f (x:zs)  "ABS"  = (abs x):zs
     f (x:zs)  "ABS"  = (abs x):zs
     f xs      y      = read y : xs
     f xs      y      = read y : xs
</source>
<!-- </source> -->


===[[Факторіал]]===
===[[Факторіал]]===
<source lang="haskell">
<!-- <source lang="haskell"> -->
fac n = product [1..n]
fac n = product [1..n]
</source>
<!-- </source> -->


== Посилання ==
== Посилання ==