Radio Shack TRS-80 PC-3 Owner's Manual page 201

290: J =B-((AA 2)/N)
300: K = SQR (J/(N - 1))
310: PRINT "STD. DEV. X = "; K
320: L = D-((C A 2)/N)
330: M = SQR (l!(N - 1))
340: PRINT "STD. DEV. Y = "; M
350: 0 = E - ((A* C)/N)
360: R =
0/
SQR (J * L)
370: PRINT "CORREL. COEF. = "; R
Compute the sum of squared deviates of X
Compute the standard deviation of X
And display
Compute the sum of squared deviates of Y
Compute the standard deviation of Y
And display
Compute the sum of products of the deviates
Compute the correlation
And display
Compute the regression coefficient
Compute the Y-intercept
Reset WAIT for leadin display
Print leadin display for equation
Reset WAIT for leadin display
Print the regression equation
Reset output to display
380: P = O/J
390:Q=G-(P*F)
400: WAIT 128
410: PRINT "REGRESSION EQUATION IS"
420: WAIT
430: PRINT "Y = "; Q; " + "; P; "X"
440: PRINT = PRINT
450: END
Minefield Game
This program provides a simple minefield game. The game is played on a
1~
x
1~
set of squares like a checkerboard. The top of
the board is north, the bottom south, the left west, and the right east. The columns are numbered horizontally from left to right,
from 1 to
1~.
The rows are numbered vertically from bottom to top, also from 1 to
1~.
You begin the game in the southwest
corner, square (1, 1). The object is to move to the northeast corner, square
(1~, 1~).
You make moves by entering a number from
1 to 9 to indicate the direction you want to take. The directions are indicated by the position of the key on the numeric pad, i.e.
201