fork download
copy 
  1. H <- 10
  2. N <- 5
  3. D <- 7
  4. C <- 9
  5.  
  6. r <- N / D
  7. d <- H * (1 + r - 2 * r ^ C) / (1 - r)
  8. cat(d, "\n", sep = "")
Success #stdin #stdout 0.25s 40768KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
56.61198
https://ideone.com/yJTxqd
language:
R (R 3.5.2)
created:
140 days ago
visibility:
secret

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!