tdpeuter/2025LogProg-project-GhentProlog
tdpeuter/2025LogProg-project-GhentProlog
Archived
1
Fork 0
Code Issues Releases Activity Actions

fix: Fixes

Browse source
This commit is contained in:
Tibo De Peuter 2025-05-18 14:56:16 +02:00
parent a1187238c3
commit 83f65bd683
Signed by: tdpeuter
GPG key ID: 38297DE43F75FFE2
8 changed files with 65 additions and 29 deletions
Download patch file Download diff file Expand all files Collapse all files

8
examples/basics/summer.pl
View file

@ -3,9 +3,7 @@ summer(Start, End, Sum) :-
Start \== End,
Next is Start + 1,
summer(Next, End, Rest),
writeln(rest(Rest)),
Sum is Start + Rest,
writeln(sum(Sum)).
Sum is Start + Rest.
my_sum :-
write('Enter start: '),
@ -17,6 +15,8 @@ my_sum :-
write(Sum), nl.
main :-
summer(1, 5, Sum).
Start = 1, End = 9,
summer(Start, End, Sum),
write('The sum of '), write(Start), write(' to '), write(End), write(' is: '), write(Sum), nl.
:- initialization(main).