Repeat

Description

desc

Source: PROLOG str. 62 Wydawnictwo PLJ Warszawa 1991 ISBN 83-85190-63-5

Download

Program source code: repeat.pl

Listing

ster :- repeat, nl, write('Podaj cel do realizacji: '), read(Cel), generow_rozw(Cel).
 
 
 
generow_rozw(Cel) :- call(Cel), write('Znalezione rozwiazanie:  '), write(Cel), nl, write('Czy generowac nastepne rozwiazanie (T/N):'), get(Odp), nl, (Odp = 78; Odp = 110).
 
 
 
generow_rozw(_) :- write('Brak innych rozwiazan '), nl.

Comments

pl/prolog/pllib/repeat.txt · ostatnio zmienione: 2019/06/27 15:50 (edycja zewnętrzna)
www.chimeric.de Valid CSS Driven by DokuWiki do yourself a favour and use a real browser - get firefox!! Recent changes RSS feed Valid XHTML 1.0