5000! product([n$(n=1..5000)]) product(cumSum([1$5000])) f:=1; (f:=f*n)$(n=2..5000):;f f:=1; for(n:=1;n<=5000;n++) {f:=f*n} f:=1;n:=1; while(n<5000) {n:=n+1; f:=f*n} f:=1; (f:=f*n)$(n=2..5000)La rapidité d'exécution est parfois contradictoire avec la clarté du programme, et on doit accepter des compromis. Dans une utilisation courante, le temps de calcul n'est pas réellement un enjeu : on utilise en général les langages interprétés comme Xcas pour tester des algorithmes et réaliser des maquettes. Les applications en vraie grandeur sont codées dans des langages compilés comme C++ (en utilisant par exemple la librarie
giac
pour les fonctions de calcul formel).