home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 27 / 64er_Magazin_Sonderheft_27_19xx_Markt__Technik_de_Disk_2_of_2_Side_B.d64 / lin.gleich.-sys (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  360b  |  16 lines
  1. 10 dim x(2,0),y(2,0),a(2,2),b(2,2),c(2,2)
  2. 12 rem *****eingabe der elemente*****
  3. 20 fori=0to2:forj=0to2:reada(i,j):nextj:nexti
  4. 25 fori=0to2:ready(i,0):nexti
  5. 28 rem *******matrizenrechnung*******
  6. 40 @inv,a,b,c
  7. 50 @mul,c,y,x
  8. 55 rem *******loesung ausgeben*******
  9. 60 fori=0to2:printx(i,0):nexti
  10. 65 rem
  11. 80 data 1, 2, 3  :rem matrix (a)
  12. 82 data 2,-1, 4
  13. 84 data 0,-1, 1
  14. 86 rem
  15. 90 data 5,11, 3  :rem vektor (y)
  16.