parprog_projekt/todo.pl

7 lines
290 B
Prolog

task('kolokwium', date(2024,06,17),1).
task('projekt_paradygmaty', date(2024,06,16),0).
task('projekt_BD', date(2024,06,20),2).
task('task', date(2024,06,10),5).
spoznione(X) :- task(X,Y,_),date_time_stamp(Y,S),get_time(T),S<T.
najwazniejsze(X) :- task(X, _, Z), \+ (task(_, _, V), V < Z).