fork download
copy 
  1. procedure main()
  2.    local i, x
  3.    i := 0
  4.    x := repeat {
  5.       writes(i, " ")
  6.       i +:= 1
  7.       if i >= 10 then break 123
  8.    }
  9.    write()
  10.    write("x = ", image(x))
  11.  
  12.    x := 111
  13.    i := 0
  14.    x := while i < 10 do {
  15.       writes(i, " ")
  16.       i +:= 1
  17.       if i >= 100 then break 99
  18.    }
  19.    write()
  20.    write("x = ", image(x))
  21. end
Success #stdin #stdout 0.01s 5276KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
0 1 2 3 4 5 6 7 8 9 
x = 123
0 1 2 3 4 5 6 7 8 9 
x = 111
https://ideone.com/SKsrQY
language:
Icon (iconc 9.5.1)
created:
8 days 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!