1
0
Fork 0
ITI0021-loogiline-programme.../PR01/prax01.pl

6 lines
119 B
Prolog
Executable File

lind(part).
lind(hani).
lendab(X):- write(X), lind(X), write(' lendab').
lendab(_):- write(' ei ole lind'),nl,!,fail.