RosettaCodeData/Task/Create-an-HTML-table/Euphoria/create-an-html-table-1.ex

puts(1,"<table>\n")
puts(1,"  <tr><th></th><th>X</th><th>Y</th><th>Z</th></tr>\n")
for i = 1 to 3 do
    printf(1,"  <tr><td>%d</td>",i)
    for j = 1 to 3 do
        printf(1,"<td>%d</td>",rand(10000))
    end for
    puts(1,"</tr>\n")
end for
puts(1,"</table>")