fork download 
  1. #light
  2. open System
  3. open System.Numerics
  4.  
  5. let fac n : BigInteger = Seq.fold (*) 1I {1I..n}
  6. let f = (fac 9000I).ToString().Length
  7. System.Console.Write f
Success #stdin #stdout 1.52s 13976KB
comments (?)
stdin 
Standard input is empty
stdout 
31682
https://ideone.com/jDTPN
language:
F# (mono 4.1)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!