Data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · cb5bb5e222
commit cb5bb5e222
parent 7387c8f97b
199093 changed files with 3378972 additions and 0 deletions
--- a/Task/User-input-Text/Logtalk/user-input-text-1.logtalk
+++ b/Task/User-input-Text/Logtalk/user-input-text-1.logtalk
@ -0,0 +1,16 @@
+:- object(user_input).
+
+    :- public(test/0).
+    test :-
+        repeat,
+            write('Enter an integer: '),
+            read(Integer),
+        integer(Integer),
+        !,
+        repeat,
+            write('Enter an atom: '),
+            read(Atom),
+        atom(Atom),
+        !.
+
+:- end_object.
--- a/Task/User-input-Text/Logtalk/user-input-text-2.logtalk
+++ b/Task/User-input-Text/Logtalk/user-input-text-2.logtalk
@ -0,0 +1,4 @@
+| ?- user_input::test.
+Enter an integer: 75000.
+Enter an atom: 'Hello world!'.
+yes