Programlama | Programlama Dilleri | C Programlama Dili |C++

Hata
  • XML Parsing Error at 1:82. Error 9: Invalid character
Anasayfa Programlama Haskell Asal Say? Testi


Asal Say? Testi

Haskell programlama dilinde yaz?lm?? bu fonksiyonun içinde ba?ka bir dersimizde gördü?ümüz bolenbul fonksiyonu kullan?lm??t?r. Kullan?c?dan al?nan say? bolenbul fonksiyonuna gönderilir elde edilen sonuc [1,x] ise bu asal say? oldu?unu gösterir.

Program Kodu :

  1.  
  2. bolenbul :: Int -> [Int]
  3. bolenbul x = cozumle x [1..x]
  4.              where
  5.              cozumle :: Int -> [Int] -> [Int]
  6.              cozumle y []    = []
  7.              cozumle y (p:ps)
  8.                             | mod y p == 0         = [p] ++ cozumle y ps
  9.                             | otherwise               = cozumle y ps
  10.  
  11. asal :: Int -> Bool
  12. asal x
  13.         |[1,x] == (bolenbul x)        = True
  14.         | otherwise                  = False
  15.          where
  16.  
  17.  
  18.  

Yorumlar (0)
Sadece kayıtlı kullanıcılar yorum yazabilir!
Son Güncelleme ( Perşembe, 26 Temmuz 2012 21:47 )  
amınıza koyayım amınıza koyayım amınıza koyayım amınıza koyayım amınıza koyayım amınıza koyayım