↓1)記稿.2023/11/21
＞ 言わずと知れた十進BASICです
DECLARE STRING X$(208,2),Y$(208,2),Z$(208,2)
FOR I=70 TO 208 STEP 1
LET A=I^2
LET B=I^2*4
LET C=I^2*9
LET AA=SQR(A)
LET BB=SQR(B)
LET CC=SQR(C)
LET X$(I,1)=STR$(A)
LET X$(I,2)=STR$(AA)
LET Y$(I,1)=STR$(B)
LET Y$(I,2)=STR$(BB)
LET Z$(I,1)=STR$(C)
LET Z$(I,2)=STR$(CC)
LET AAA$=X$(I,1) & "(" & X$(I,2) &"^2)"
LET BBB$=Y$(I,1) & "(" & Y$(I,2) &"^2)"
LET CCC$=Z$(I,1) & "(" & Z$(I,2) &"^2)"
LET amari=MOD(I,10)
IF amari=0 OR amari=1 THEN PRINT
PRINT AAA$,BBB$,CCC$
NEXT I
END
※ まず数値を配列に入れて、次に文字列の配列に変換代入しようと思ったのだが
諸々とエラーしまくるのでスパッと諦めた（どこで間引けてどこで駄目なのかよく分からん）
↓/続きを読む/↓
