Sayfa 24

FOR TO c188> IF THEN PRİNT * TARSIZ DENKLEM SETİ VERİLDİ." 1GOSUB 180 TO NESUMASUMSA 3 KEPRİNT FOR isi TO NEPRİNT *

EXT 1 GOSUB 180 PRİNT <ı78)> REM sese MATRİS <a235> 21600 <210> PRİNT <ese> PRİNT <case> PRİNT 1 <RV MATRİSLERDE TOPLAMA" <e78> PRİNT 2 <RVS

OFF) MATRİSLERDE CİKARMA" PRİNT 3 <RVS MATRİSLERİN CARPIMI* PRİNT *COOKN>CERİGHT><RVSON> 4 <RVS ÖFF> TERS MATRIS BULMA" PRİNT 5 <RVS

ANA MENÜYE DONUS" GOSUB ACI OR THEN 3078 GOSUB 37006 <133> AGOTO — <a37> MATRİSLERDE TOPLAMA" v8 21000 PRİNT MATRİSİN M. N DEĞERİNİ GİRİNİZ MEN <150> GOSUB 24080:GOSUB 25000 <867>

GOSUB APLANIYOR. 1 FOR Isi TO Jel TO ASIPRINT 26 3008 CİKARMA*1GOSUB 2100 e PRİNT MATRİSİN M. N DEĞERİNİ M.N GOSUB 24006:60SUB 25006 GOSUB APLANIYOR... "PRİNT *<HOME FOR TO TO BLL.KIPRINT ASIPRINT 26 ©00:60TO 3000 CARPIMI 2100 © PRİNT MXP DEĞERLE RİNİ 2.X PRİNT RXN DEĞERLE

© J NEXT 1 PRİNT * HOME "7 FOR Js1 TO V POKE 211.KIPRINT *<U

JEPRİNT TAPRİNT GOSUB 3666

MATRIS HESABI" 1GOSUB 21000 PRİNT MATRISININ N VERİNİZ GOSUB 270001D1M .CC GOSUB 8 MATRISC2SPACE CHOME>* FOR TO ZaY THEN 0 3766 NEKT FOR Kel TO TO FOR TO LI) J TENEKT K FOR Kel TO IF THEN PRİNT * TARSIZ MATRIS 26000 160TO 3880 E“LZACI.DAFOR TO J K FOR Isi TON ee) PRİNT 1 THEN 3740 PRİNT GOSUB 3000 GOSUB "FONKSİYONUN BUL 21008 PRİNT *<DOKN><RIGHT)FONKSIYONA ATT KAC DEGER N PRİNT DERECESİN 1 MEPRİNT 1 GOSUB FOR Isi TO NEPRİNT * KCDAPRINT INPUT NEKT TO Isi T O Ted Kal TO IskKel T O Jak TO P 1.K FOR Kel TO PiFOR TO Jelei TO J K GOSUB 218008:PRIİNT APLANIYOR. .. *<RİGHTOF FOR Isi TO OR THEN AS 160TO 4136 IF 4150 IF THEN THEN 4180 THEN 4180