QB教程（二）输入语句之read/data

来自:雷网 作者:leinet
　　READ/DATA语句
使用INPUT语句虽然灵活，但不易于保存信息。遇到这种情况可以使用READ/DATA语句。
语句格式：
READ 变量，变量，变量，…… DATA 数值，数值，数值，……
语句功能：
READ的含义是读，DATA的含义是数据。这两个语句要配合使用。当程序执行到 READ语句时，READ语句中的变量就会按顺序到DATA语句中去读去相应的数据。其中，DATA语句是一个非执行语句，它只是为READ语句提供数据。因此，DATA语句可以放在程序的任何地方。
例如：到河边去采集标本，小明采集１４件，小刚采集１０件，小强采集８件， 若将标本转入４个标本夹，平均每本装几件？
read a,b,c
read n
p=(a+b+c)/n
print p
data 14,10,8,4
end
例如：有三个采茶小组。第一组１０人，一天共采茶１３０公斤，第二组１２ 人，一天共采茶１４４公斤，第三组１１人，一天共采茶１２２公斤。求三组平均 每人一天采茶多少公斤？
read a,b
read c,d
read e,f
r=a+b+c
g=d+e+f
p=g/r
data 10,12,11
data 130,144,122
end
----------------------------------------------------------- 使用READ/DATA语句时应注意：
1.数据的个数不能少于变量的个数，否则程序将停止运行并出现提示信息。
2.DATA语句重的数据必须是常数。
3.变量之间，数据之间都要有逗号分隔，语句末尾不要又逗号。
如果数据很多，而且很多数据是相同的，可以使用恢复数据区域局。 格式：RESTORE
功能：将读数指针回到DATA语句中数据的初始位置。
read a,b,c,d
restore
read e,f,g,h
print a,b,c,d
print e,f,g,h
data 1,2,3,4
end
练习：
实验小学五年级一班分成三个小组在小工厂糊纸盒。第一组１６人糊了２６１个， 第二组１４人糊了２１５个，第三组１５人糊了２５９个，问全班平均每人糊了多 少个？ 奶奶买来１０袋米，每袋1.5元，２袋绿豆，每袋4.5元，1.5包花生，每包３元， 算一算奶奶一共花了多少钱。 一个三位数，百位数比十位数大５，个位数是百位数的２倍，若十位数是３，打印 这个三位数。