Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- build(0) :- nl.
- build(N) :-
- N>0,
- write("*"),
- N2 is N-1,
- build(N2).
- asterisk(0).
- asterisk(N) :-
- N>0,
- build(N),
- N2 is N-1,
- asterisk(N2),
- build(N).
- *****
- ** **
- ** *
- * *
- *
- *
- * *
- ** *
- ** **
- *****
- *****
- ****
- ***
- **
- *
- *
- **
- ***
- ****
- *****
Add Comment
Please, Sign In to add comment