На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
  
> пролог поиск в списке
    Ребята, как проверить есть ли в списке 0 или 1
    Если есть хоть одна 0 или 1 true в другом случае false
      ExpandedWrap disabled
        zeroone(L):-not(nozeroone(L)).
         
        nozeroone([]).
        nozeroone([0|_]):-!,fail.
        nozeroone([1|_]):-!,fail.
        nozeroone([_|L]):-nozeroone(L).


      Вызывать, естественно, zeroone(<список>).
      0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
      0 пользователей:


      Рейтинг@Mail.ru
      [ Script execution time: 0,0192 ]   [ 15 queries used ]   [ Generated: 3.05.24, 01:15 GMT ]