Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.
Nástěnka
❗22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
❗04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
❗23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.
Nejste přihlášen(a). Přihlásit
Ahoj, snažím se vyřešit pár úloh pomocí programu SWI-Prolog. Zadání zní:
AŽ
DO
AŠE
JEDE
NAŠE
-------
AUTO
Do prologu jsem zadal
alg2:-
c(Z),
c(O),O\=Z,
c(E),E\=O,E\=Z,
S1 is Z+O+E+E+E,
S1 is c(O),
c(A),A\=Z,A\=O,A\=E,
c(D),D\=E,D\=O,D\=Z,D\=A,
c(S),S\=Z,S\=O,S\=E,S\=A,S\=D,
S2 is A+D+S+D+S,
S2 is c(T),
S3 is A+E+A,
S3 is c(U),
c(J),J\=Z,J\=O,J\=E,J\=A,J\=D,J\=S,J\=T,J\=U,
c(N),N\=Z,N\=O,N\=E,N\=A,N\=D,N\=S,N\=T, N\=U, N\=J,
S4 is J+N,
S4 is c(A),
write(' ':A:Z), nl,
write(' ':D:O), nl,
write(' ':A:S:E), nl,
write(J:E:D:E), nl,
write(N:A:S:E), nl,
write(________), nl,
write(A:U:T:O),nl,
fail,
c(0).
c(1).
c(2).
c(3).
c(4).
c(5).
c(6).
c(7).
c(8).
c(9).
Ale když zadám řešení, napíše mi to pouze false, v čem je chyba?
Děkuji za každou odpověď.
Offline