fork download
  1. USING: kernel sequences locals io formatting strings math math.parser math.functions ;
  2. IN: main
  3. "Hello, World" print
  4. readln string>number 1 +
  5. iota [ 2 log * exp round "%d " printf ] each
Success #stdin #stdout 1.3s 165056KB
stdin
30
stdout
Hello, World
1 2 4 8 16 32 64 128 256 512 1024 2048 4096 8192 16384 32768 65536 131072 262144 524288 1048576 2097152 4194304 8388608 16777216 33554432 67108864 134217728 268435456 536870912 1073741824