RosettaCodeData/Task/Loops-Foreach/Prolog/loops-foreach.pro
2023-07-01 13:44:08 -04:00

7 lines
98 B
Prolog

?- foreach(member(X, [red,green,blue,black,white]), writeln(X)).
red
green
blue
black
white
true.