PRINT
PRINT "datades1.txt の内容は次のようになっています。"
PRINT
PRINT "1"
PRINT "1"
PRINT "0"
PRINT "1"
PRINT "0"
PRINT
PRINT
DIM E(5)
DATA 0,1,2,3,4
MAT READ E
FOR i=1 TO 5
   PRINT E(i);
NEXT i
PRINT
PRINT
DATA 5,6,7,8,9
FOR i=1 TO 5
   READ F
   PRINT F;
NEXT i
PRINT
PRINT
DATA 0,0,1,0,1
LET C=0
FOR i=1 TO 5
   READ G
   LET C=C+G*2^(5-i)
NEXT i
PRINT "00101（２進数） → ";C;"（10進数）"
PRINT
OPEN #1:NAME "datades1.txt",ACCESS INPUT
LET C=0
FOR i=1 TO 5
   INPUT #1:dat
   LET C=C+dat*2^(5-i)
NEXT i
PRINT "11010（２進数） → ";C;"（10進数）"
PRINT
END