Write a Prolog program that reads numbers from the standard input until a 0 is entered, creates a list of the numbers entered (not including the 0), and then prints the list in the order entered, one number per line. (read(X) can be used to read integer X from the input if the integer is entered on its own line and is terminated by a period.)