procedure main()
printf("<table>\n    <tr><th></th><th>X</th><th>Y</th><th>Z</th>")
every r := 1 to 4 do {
   printf("</tr>\n    <tr><td>%d</td>",r)
   every 1 to 3 do printf("<td>%d</td>",?9999)  # random 4 digit numbers per cell
   }
printf("</tr>\n</table>\n")
end

link printf