output Example10 DIM R(1),A$(1)[1]
20 R(0)=-1
30 R(1)=+1
40 MAT A$=("A")
50 ASSIGN @I TO CRT
60 OUTPUT @I;1.E+5,1.E+7
70 OUTPUT @I;1;-1
80 OUTPUT @I;R(*),
90 OUTPUT @I;CMPLX(1,1.23456789012345E+7)
100 OUTPUT @I;CMPLX(1,1);
110 OUTPUT @I;"B";"C","D"
120 OUTPUT @I;A$(*);
130 END
|