import Data.List
import Control.Monad

liczby = do
  t1 <- [1..9]
  t2 <- [0..9]
  t3 <- [0..9]
  t4 <- [0..9]
  t5 <- [0..9]
  guard (length (nub [ t1, t2, t3, t4, t5 ]) == 3)
  return 1
  
  
main = print (length liczby)