2011.4基础班笔记-整理5.doc

数组 成绩 0-100 共性 X y z I j k…普通变量-不需要定义，直接使用 1.定义数组 Dime 数组名(总个数) Dime a(50) Dime a(1000) 空 A(i) i=1 to 50 a(1) a(2) … A(50) 2.初始化 1）input For i=1 to 50 Input “请输入成绩” to a(i) Endfor 2）rand():0-1 随机产生30个60-100整数-成绩，平均分 Int(rand()*(终值-初值+1)+初值) Dime a(30) For i=1 to 30 A(i)=int(rand()*(100-60+1)+60) endfor 3.输出 例子 将一个一维数组进行逆序存放。 随机产生n个两位的整数，n由键盘输入 将这组数据逆序存放， 并显示逆序存放后的结果。本身10-99 Input “n=” to n Dime a(n) -1 定义 for i=1 to n a(i)=int(rand()*(99-10+1)+10)endfor 2. 初始化 for i=1 to int(n/2) t=a(i) a(i)= a((n+1)-i) a((n+1)-i)=t endfor 3.具体操作 for i=1 to n ?a(i) Endfor 4. 输出结果 return n=5 5/2=int(2.5) a(1) a(2) a(3) a(4) a(5) a(6) 10 45 87 90 66 35 35 66 90 87 45 10 6 a(i)-a((6+1)-i) i=1,2,3 x,y t=x x=y y=t dime a(6) for i= 1 to 6 a(i)=int(rand()*(99-10+1)+10 endfor for i=1 to 3 t=a(i) a(i)=a((6+1)-i) a((6+1)-i)=t endfor for i=1 to 6 ?a(i) Endfor Return 回文数 7-i a(1)-a(6) 1+6=7 6=7-1 a(2)-a(5) 2+5=7 5=7-2 a(3)-a(4) 3+4=7 4=7-3 6/2=3 循环 For i=1 to 3 A(i)-a((6+1)-i) i=1,2,3 T=a(i) A(i)=a((6+1)-i) a((6+1)-i)=t Endfor x-y A(1)-a(6) 1+6=7 6=7-1 7-i A(2)-a(5) 2+5=7 5=7-2 A(3)-a(4) 3+4=7 4=7-3 30 最大值和下标 随机产生10个60-100的整数，找出其中的最大值和下标。 Dime a(10)for i=1 to 10 A(i)=int(rand()*(100-60+1)+60) endfor 从键盘输入10个60-100的整数，找出其中的最大值和下标。 Dime a(10)for i=1 to 10 Input “” to a(i) endfor 定义数组 初始化 Input-键盘 随机函数-rand() Dime a(10) For i=1 to 10 A(i)=int(rand()*(100-60+1)+60)endfor M=a(1) P=1 For i=2 to 10 If ma(i) then M=a(i) P=i Endif Endfor ?”最大值:”,m ?”下标：”,p Return a(1) a(2) a(3) a(4) a(5) 10 45 87 90 66 M=90 P=4 第一个元素赋给m，第一个元素的下标赋给p 依次让m和后续元素比较，只要后面的元素大于m，就将后续元素的值赋给m，其下标赋给p 比较结束，最大值-m，下标-p m=A(1) p=1 for i=2 to 5 if ma(i) then m=a(i) p=i endif endfor ?m ?p X y z 从键盘 随机产生20个60-100的整数，并找出其中最接近平均值的数。最小值 Dime a(20) S=0 For i=1 to 20 A(i)=… S=s+a(i) Endfor Ave=s/20 M=abs(a(1)-ave) P=1 For i=2 to 20 If mabs(a(i)-ave) then M=abs(a(i)-ave) P=i Endif Endfor ?a(p) Return A(5)=64.01-64=0.01 Abs(a(i)-ave) m=0.01 p=5 a