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