*set show=1
*echo
<title>Planet Puzzle</title>
<h2>Planet Puzzle</h2>
<form METHOD="POST" action="/cgi-bin/twk/examples/B.jr">

!seed determines which list of "random" numbers (ran) is used
!we set it based on process specific information:
!the process identification number (pid) and the number of 
!seconds since midnight (secnds)

*let seed=pid*secnds

!r ranges from .4 to 5.4

*let r=nint(50*ran)/10+.4
*if (r.eq.1) then
*let r=1.1
*endif

!rdigits(2) makes a two digit random number like: .XX0000
*let m=rdigits(2)*10+1.1

*hide m f4.1
*hide r f3.1

<hr>
Your warp drive fails while rushing to the starbase near 61 Cygni A.
Seeking dilithium, you use remaining impulse power to approach an uncharted planet which is mostly
covered with oceans.  With a mass of
*write m f4.1
times Earth's mass, the planet is more massive than Earth.

*if (r.lt.1) then
The planet is a bit smaller than Earth:
its radius is
*write r f4.2
times the Earth's radius.
*elseif (r.gt.1) then
The planet is larger than Earth:
its radius is
*write r f5.1
times the Earth's radius.
*endif

<p>Klingons are able to work under adverse conditions including
gravitational pulls of up to 7.3 times that of Earth
(Earth surface has <em>g</em>=9.8 m/s<sup>2</sup> ).

<p>Can you beam the Klingons down to the surface to search for dilithium or
should you attempt to find dilithium from orbit and then
beam it aboard?<p>

<p>What surface gravitational pull should your away team should expect?

<p><hr>
<b>number box:</b>
<p><SELECT NAME="nb1">
<option> 0
<option> 1
<option> 2
<option> 3
<option> 4
<option> 5
<option> 6
<option> 7
<option> 8
<option> 9
</select>.<SELECT NAME="nb2">
<option> 0
<option> 1
<option> 2
<option> 3
<option> 4
<option> 5
<option> 6
<option> 7
<option> 8
<option> 9
</select>&nbsp;&#215;&nbsp;10<sup><sup><SELECT NAME="1000">
<option> +
<option> -
</select><SELECT NAME="nbe1">
<option> 0
<option> 1
<option> 2
<option> 3
<option> 4
<option> 5
<option> 6
<option> 7
<option> 8
<option> 9
</select></sup></sup> times that on the surface of Earth.
<p><hr>
<b>select:</b> including calculated distracters
<p><SELECT NAME="g1">
*write m/r^2 '14H<option value= ,e10.4,1H>,$'
*write m/r^2 'f5.2'
*write m/r '9H<option> ,f5.2'
<option> 7.3
*write m '9H<option> ,f5.1'
*write m*r '9H<option> ,f5.1'
*write r '9H<option> ,f5.1'
</select>

<p><hr>
<b>radio buttons:</b> including calculated distracters
<p><input type=radio name=g2 
*write m/r^2 '6Hvalue=,e12.4,1H>'
*write m/r^2 web.1
<br><input type=radio name=g2 
*write m/r '6Hvalue=,e12.4,1H>'
*write m/r web.1
<br><input type=radio name=g2 value=7.3>7.3
<br><input type=radio name=g2 
*write m '6Hvalue=,e12.4,1H>'
*write m web.1
<br><input type=radio name=g2 
*write m*r '6Hvalue=,e12.4,1H>'
*write m*r web.1
<br><input type=radio name=g2 
*write r '6Hvalue=,e12.4,1H>'
*write r web.1
<p><hr>
<input value="Grade Me" type=submit>

<p><hr>
You might want
to use the <em>Netscape</em> "View" menu to look at the
"Document Source"...i.e., exactly what was sent to your browser.