Sākums Izpētīt Palīdzība
Pierakstīties
CNI
/
Prlog
2
0
Atdalīts 0
Faili Problēmas 0 Izmaiņu pieprasījumi 0 Vikivietne
Koks: 96920e094b
Atzari Tagi
Prlog
/
tp
/
1
/
prime.lp

prime.lp 101 B
Vēsture Neapstrādāts

1234 
  1. % Define
    2. 

  2. #const n = 10.
    3. 

  3. compose(N) :- N=1..n, I=2..N-1, N\I = 0.
    4. 

  4. prime(N) :- N=2..n, not compose(N).
    5.