12 lines
184 B
Text
12 lines
184 B
Text
|
global semilla
|
||
|
|
semilla = 675248
|
||
|
|
for i = 1 to 5
|
||
|
|
print i; ": "; Random()
|
||
|
|
next i
|
||
|
|
end
|
||
|
|
|
||
|
|
function Random()
|
||
|
|
semilla = floor((semilla*semilla/1e3) mod 1e6)
|
||
|
|
return int(semilla)
|
||
|
|
end function
|