This website requires JavaScript.
Explore
Help
Sign in
Paris8
/
iaj
Archived
Watch
1
Star
0
Fork
You've already forked iaj
0
Code
Issues
Pull requests
Projects
Releases
Packages
Wiki
Activity
This repository has been archived on
2023-04-18
. You can view files and clone it, but cannot push or open issues or pull requests.
ea2f206898
iaj
/
TP1
/
Prolog
/
AidesCPP
/
fac.pl
9 lines
100 B
Perl
Raw
Normal View
History
Unescape
Escape
add "utiliser-swipl-en-cpp.tgz"
2023-02-01 10:10:53 +01:00
fac
(
1
,
1
)
:
-
!
.
fac
(
X
,
F
)
:
-
X
>
1
,
Y
is
X
-
1
,
fac
(
Y
,
Next
)
,
F
is
X
*
Next
.
format
2023-02-01 10:19:02 +01:00
%
?
-
fac
(
3
,
X
)
.
Reference in a new issue
Copy permalink