Listing of file='13' on disk='vmedia/glbr_22.wvd.zip'
# Sector 235, program filename = '13' 0005 PRINT "VECTOR A?" 0010 INPUT X1,Y1,Z1 0015 PRINT "VECTOR B?" 0020 INPUT X2,Y2,Z2 0025 PRINT 0030 PRINT "A+B=(";X1+X2;",";Y1+Y2;",";Z1+Z2;")" 0035 PRINT "A-B=(";X1-X2;",";Y1-Y2;",";Z1-Z2;")" 0040 PRINT "AB=";X1*X2+Y1*Y2+Z1*Z2 0045 PRINT "AXB=(";Y1*Z2-Z1*Y2;",";Z1*X2-X1*Z2;",";X1*Y2-Y1*X2;")" 0050 PRINT 0055 PRINT "MORE INPUT? (1=YES,0=NO)" 0060 INPUT X1 0065 PRINT 0070 IF X1=1 THEN 5 0075 END