Source code in the ring programming language

# Project: Create an HTML table
 
load "stdlib.ring"

str = ""
ncols = 3
nrows = 4 
 
str = str + "" + windowsnl()
str = str + "" + windowsnl() for row = 0 to nrows     if row = 0        str = str + ""    else        str = str + ""     ok    for col = 1 to ncols         if row = 0             str = str + ""         else            str = str + ""          ok    next     str = str + windowsnl() + "" +windowsnl()next str = str + "






" + row + "



" + char(87 + col) + "

" + random(9999) + "





" + windowsnl()
str = str + "" + windowsnl()

remove("temp.htm")
write("temp.htm",str)
see str + nl
systemcmd("temp.htm")