m:-between(0,18,I),X is ceil(21.785362*(7/3)^I),\+print(X).