Voici le code pour Floor:
Code : Tout sélectionner
01 LBL "FLOOR"
02 X<0?
03 FS?30
04 GTO 00
05 SIGN
06 ST+L
07 X<>L
08 LBL 00
09 INT
10 X<0?
11 ISG L
12 END
Code : Tout sélectionner
01 LBL "CEIL"
02 X<=0?
03 GTO 00
04 SIGN
05 ST+L
06 X<>L
07 LBL 00
08 INT
09 X>0?
10 DSE L
11 END