C
Chuck Insight
I am way over my head with this one - Here is the code:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><script runat = 'server'>
Public Overridable Sub Add(key As Object, value As Object)
dim balls as hashtable = new hashtable
randomize
dim ball as integer = int(rnd * 48) + 1
dim i as integer
for i = 1 to 300
on error resume next
dim sample as arraylist = new arraylist
dim s as integer
for s = 1 to 48
s += 1
sample.add(s)
next s
if ball = 1 and sample.contains(ball) then
balls.add(ball)
sample.remove(1)
goto end
endif
end:
Next i
end sub</script></head><body></body></html>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><script runat = 'server'>
Public Overridable Sub Add(key As Object, value As Object)
dim balls as hashtable = new hashtable
randomize
dim ball as integer = int(rnd * 48) + 1
dim i as integer
for i = 1 to 300
on error resume next
dim sample as arraylist = new arraylist
dim s as integer
for s = 1 to 48
s += 1
sample.add(s)
next s
if ball = 1 and sample.contains(ball) then
balls.add(ball)
sample.remove(1)
goto end
endif
end:
Next i
end sub</script></head><body></body></html>