16 lines
559 B
Text
16 lines
559 B
Text
|
UInt32 seed = 0
|
|||
|
|
F nonrandom(n)
|
|||
|
|
:seed = 1664525 * :seed + 1013904223
|
|||
|
|
R Int(:seed >> 16) % n
|
|||
|
|
|
|||
|
|
F rand9999()
|
|||
|
|
R nonrandom(9000) + 1000
|
|||
|
|
|
|||
|
|
F tag(tag, txt, attr = ‘’)
|
|||
|
|
R ‘<’tag‘’attr‘>’txt‘</’tag‘>’
|
|||
|
|
|
|||
|
|
V header = tag(‘tr’, ‘,X,Y,Z’.split(‘,’).map(txt -> tag(‘th’, txt)).join(‘’))"\n"
|
|||
|
|
V rows = (1..5).map(i -> tag(‘tr’, tag(‘td’, i, ‘ style="font-weight: bold;"’)‘’(0.<3).map(j -> tag(‘td’, rand9999())).join(‘’))).join("\n")
|
|||
|
|
V table = tag(‘table’, "\n"header‘’rows"\n")
|
|||
|
|
print(table)
|