206
02700
02710
02720
02730
02740
02750
02760
02770
02780
02780
02800
02830
02840
02850
02860
02870
02890
02900
02910
02920
02830
02940
02850
02960
02970
02980
02880
03000
03010
03020
03030
03040
03050
03060
03070
03080
03080
03100
03110
03120
03130
03140
03160
03170
03180
03190
03200
03210
03230
03240
03270
03280
93280
03300
03310
03320
23330
03340
03350
03360
03380
03400
03410
PRINT #19, USING
PRINT #18, USING
PRINT #18, USING
PRINT #19, USING
PRINT #19, USING
PRINT #19, USING
RINT #19, USING
NEXT I
>##’, ENGED;
>##4#4’, SRECALL (1,1);
>HA##’, SRECALLG (1,1);
>####, SCARD (1,1);
>HHAR, RS (1-1);
>###H', SQFREQ (I)
>HEHEH, SQFM (I)
i PRINT ONE CASES DATA HORIZONTALLY FOR CALCULATION OF MEDIAN RANK
PRINT #20, USING
PRINT #20, USING
PRINT #20, USING
PRINT #20, USING
PRINT #20. USING
>HE#R,
SHE, L;
>###', AGE;
">HHKH#!, MSEX;
'>###!, ENGED
FOR I = 2 TO 24
PRINT #20, USING '>###', SRECALL (1,I);
NEXT I
PRINT #20, USING ‘>###’, SRECALL (1,25)
FORI = 2 TO 24
PRINT #20, USING ‘>###', SRECALLG (1,I);
NEXT 1
PRINT #20, USING ‘>###’, SRECALLG (1,25)
FOR I = 2 TO 24
PRINT #20, USING ‘>###’, SCARD (1,1);
NEXT I
PRINT #20, USING ’‘>###', SCARD (1,285)
FOR I = 1 TO 23
PRINT #20, USING ’'>###’, RS (1);
NEXT I
PRINT #20, USING ’‘>###', RS (24)
FOR I = 2 TO 24
PRINT #20, USING '>###’, SQFREQ (I);
NEXT I
SRINT #20, USING ‘>###/, SQFREQ (25)
FOR I = 2 TO 24
PRINT #20, USING ‘>###’, SQFM (I);
NEXT I :
PRINT #20, USING ’'>###', SQFM (25)
NEXT SS
PREPARING OUTPUT PRINTING MATRICES
FOR I = 1 TO 135
CRFREQ(I) = RFREQ(1,I)
ERFREQ(I) = RFREQ(2,I)
CQFREQ(I) = QFREQ(1,I)
EQFREQ{(I) = QFREQ(2,I)
NEXT I
FOR I = 1 TO 25
FOR J = 1 TO 25