早教吧作业答案频道 -->数学-->
一段VB代码,请问READ,RESTORE和DATA各是什么意思?谢谢!READA,B,C,DX=B+DRESTORE130READA,B,C,DY=B+DRESTOREFORJ=1TO8READANEXTJX=X+Y+A：PRINTXDATA1,2,3DATA4,5,6DATA7,89END
题目详情
一段VB代码,请问READ,RESTORE 和 DATA 各是什么意思?谢谢!
READ A,B,C,D
X=B+D
RESTORE 130
READ A,B,C,D
Y=B+D
RESTORE
FOR J=1 TO 8
READ A
NEXT J
X=X+Y+A ： PRINT X
DATA 1,2,3
DATA 4,5,6
DATA 7,8 9
END
READ A,B,C,D
X=B+D
RESTORE 130
READ A,B,C,D
Y=B+D
RESTORE
FOR J=1 TO 8
READ A
NEXT J
X=X+Y+A ： PRINT X
DATA 1,2,3
DATA 4,5,6
DATA 7,8 9
END
▼优质解答
答案和解析
READ是指读取
RESTORE是上面的加法加到总和到130后复位
DATA是指最后的数据输出,1,2,3……这些是上面print出的X的代号,我觉得应该是进行数据的排列之类的
RESTORE是上面的加法加到总和到130后复位
DATA是指最后的数据输出,1,2,3……这些是上面print出的X的代号,我觉得应该是进行数据的排列之类的
看了 一段VB代码,请问READ,...的网友还看了以下：
1.196(a-b)*-196(a+b)*2.(a+b+c)*-(a+b-c)*3.(2p+3q)* 2020-03-31 …
关于一元二次方程解的情况题：已知实数a,b,c,且a^2+b^2+c^2=a+b+c=2,求a,b 2020-05-17 …
已知a+b+c=0,试求a^2/(2a^2+bc)+b^2/(2b^2+ac)+c^2/(2c^2 2020-06-11 …
已知a,b,c是正数,且任意两数之和不等于第三数,根号（a+b+c）^2+根号（a-b-c)^2+ 2020-06-13 …
（a+b+c+d）^2和（a+b+c+d+e）^2根据(a+b)^2=a^2+b^2+2ab(a+ 2020-06-20 …
若实数a、b、c满足根号a+根号(b-1)+根号(c-2)=1/2(a+b+c),解这题里(a-2 2020-07-22 …
1.若a-1/a=4,则a＾2+1/a＾2=2.如果(3x+3y+1)(3x+3y-1)=35,那 2020-07-30 …
若a,b,c互不相等,求证关于x的方程（a^2+b^2+c^2)X^2+2(a+b+c)X+3=0 2020-08-01 …
(a+b+c)^3-(b+c-a)^3-(c+a-b)^3-(a+b-c)^3=[(a+b+c)^ 2020-08-02 …
已知a,b,c＞0,abc=1,求证：a^3+b^3+c^3≥ab+bc+ca由基本不等式：ab+ 2020-08-03 …