Bu sayfadaki yazılar
Sayfanın metni
Sayfa 5
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 4
REM #44 PROC MATMUL REM PRINT ATC(12,23)Ps FOR Isi TO Riİ:FOR Js1 TO TO Cİ NEXT T FOR Izi TO Rİ:FOR Js1 TO NEXT NEXT END PROC REM PROC MATINY REM İzi TO Cİ:FOR TO Ci:Tİ XT IF AND THEN THEN 4058 IF Z>Cİ THEN PROC IF Z<>X THEN RCOMP :Rİ-Rİ/DN: OSUB 4120 IF OR THEN A) RCOMP 4158 FOR Izi TO Ci IF I-X THEN THEN 4189 IF <ALCMI,I,X)<>8 OR THEN RCOMP 1K-X:GOSUB 4128 NEXT #IİF THEN 4048 FOR TO Cİ:FOR Jzi TO NEXT END PROC REM SUBPROC #3 FOR Js1 TO #TLX*ALCMI,K,I) *Tali,K,I) REM **t*t SUBPROC #4 FOR TO 1 RETURN REM PROC MATTRANS REM xxx PRINT AT<(12,23)Ps FOR Isi TO Rİ:FOR Js1 TO EXT :NEKT FOR Izi TO Cİ:FOR Js1 TO