main.pl

:- module(main,_).
:- use_package(.(for_loop)).



%main :- for I = 3 to 8 do (M is I*I,display(M),nl).
%main :- for 2 to 6 do 1.

main:-
    for I = 3 to 8 do (M is I*I,display(M),nl),
    for D = 1 to 8 do (R is D+D,display(R),nl),
    for J = 1 to 8 do (X is J,display(X),nl).