Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- %3
- книга("Пушкин", "Пушкин_Книга1", "Эксмо", 2015).
- книга("Пушкин", "Пушкин_Книга2", "Эксмо", 2008).
- книга("Гоголь", "Гоголь_Книга1", "Изд", 2007).
- книга("Гоголь", "Гоголь_Книга2", "Эксмо", 2019).
- книга("Авт1", "Книга11", "Изд", 2002).
- книга("Авт1", "Книга12", "Эксмо", 2012).
- книга("Авт0", "Книга0", "Изд", 2018).
- книга("Авто2", "Книга2", "Эксмо", 2005).
- книги():-книга(_, Название, _, _), write(Название), nl, fail.
- книги(Автор1, Автор2):-книга(Автор, Название, _, _), (Автор==Автор1; Автор==Автор2), write(Название), nl, fail.
- книги(Издательство, МинГод):-книга(_, Название, Издательство, Год), Год>=МинГод, write(Название), nl, fail.
- % 1
- % книги
- %
- % 2
- % книги("Пушкин", "Гоголь")
- %
- % 3
- % книги("Эксмо", 2010)
Add Comment
Please, Sign In to add comment