EVAL FINAL ESAYYYYYYY
This commit is contained in:
16
eval-final-projet/input/eval20.l
Normal file
16
eval-final-projet/input/eval20.l
Normal file
@@ -0,0 +1,16 @@
|
||||
fact( entier $f )
|
||||
{
|
||||
si $f = 1 | $f = 0 alors {
|
||||
retour 1;
|
||||
}
|
||||
sinon {
|
||||
retour fact( $f - 1 ) * $f ;
|
||||
}
|
||||
}
|
||||
|
||||
main()
|
||||
entier $a;
|
||||
{
|
||||
$a = lire();
|
||||
ecrire( fact( $a ) );
|
||||
}
|
||||
Reference in New Issue
Block a user