language: Prolog (swi) (swipl 5.6.64)
date: 111 days 10 hours ago
link:
visibility: public
1
2
3
cube :- read(X), calc(X).
calc(stop) :- write(done).
calc(X) :- C is X * X * X, write(C), cube.