您所在位置：主题：[讨论]求几个程序填空的答案,急~拜托了
smallcomb
[专家分：0] 发布于 2008-10-22 23:42:00
1、求5名学生某门课程的平均分.假设用数组S来存储每个学生的成绩.
dim s(1 to 5)
read s(1),s(2),s(3),s(4),s(5),
let sum=填空
let填空
print "ave=";ave
data 62,71,96,88,84
end
2、矩阵转置。将MxN矩阵A的行和列互换，得到NxM的矩阵At,At称我A的转置矩阵。
for i-1 to n
for j=1 to m
填空
next j
next i
3、已知Fibonacci数列的递推关系如下：
F1=F2=1 (初始条件)
Fn=Fn-1+Fn-2 (n>=3)
求前15个Fibonacci数的QBASIC程序如下：
dim fib(15)as integer
dim term as integer
let fib(1)=1
let fib(2)=1
for term=3 to 15
填空
next term
print"fibonacci series are:"
for term=1 to 15
print"term";term;"is";fib(term)
next term
end
我写的填空的地方就是要填空的地方，我没学过这个语言，但是要考试，谢谢各位高手了
dim s(1 to 5)
read s(1),s(2),s(3),s(4),s(5),
let sum=填空
let填空
print "ave=";ave
data 62,71,96,88,84
end
2、矩阵转置。将MxN矩阵A的行和列互换，得到NxM的矩阵At,At称我A的转置矩阵。
for i-1 to n
for j=1 to m
填空
next j
next i
3、已知Fibonacci数列的递推关系如下：
F1=F2=1 (初始条件)
Fn=Fn-1+Fn-2 (n>=3)
求前15个Fibonacci数的QBASIC程序如下：
dim fib(15)as integer
dim term as integer
let fib(1)=1
let fib(2)=1
for term=3 to 15
填空
next term
print"fibonacci series are:"
for term=1 to 15
print"term";term;"is";fib(term)
next term
end
我写的填空的地方就是要填空的地方，我没学过这个语言，但是要考试，谢谢各位高手了