十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
'楼上的程序在输入奇数个整数时可能会出错
站在用户的角度思考问题,与客户深入沟通,找到社旗网站设计与社旗网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:网站建设、成都网站制作、企业官网、英文网站、手机端网站、网站推广、申请域名、网页空间、企业邮箱。业务覆盖社旗地区。
'给分万能的,想输入多少数据都可以,程序以调试可用
Dim i As Integer, n As Integer
If TextBox0.Text = "" Then
MsgBox("请输入您想输入数字的个数")
Exit Sub
End If
n = CInt(TextBox0.Text)
Dim ar(n) As Integer
For i = 0 To n - 1
MsgBox("请输入第" Str(i + 1) "个数字")
ar(i) = Val(InputBox("请输入")) '将输入的数据转换为数值型
Next
Dim str1 As String, str2 As String
For i = 0 To n - 1
If str1 = "" Then
str1 = ar(i)
Else
str1 = str1 " " ar(i)
End If
Next
For i = 0 To n - 1
If str2 = "" Then
str2 = ar(n - 1 - i)
Else
str2 = str2 " " ar(n - 1 - i)
End If
Next
TextBox1.Text = str1
TextBox2.Text = str2
以一个10个元素的数组,而且存储数据依次为1,2,3,4,5,6,7,8,9,10
将一个长度固定的数组逆序储存,就是在原来的这个数组中,将数据的存储改成依次为:
10,9,8,7,6,5,4,3,2,1
参考
#includestdio.h
int main()
{int n,i,j,t,a[200];
printf("数组中数的个数:");
scanf("%d",n);
printf("数组中的数:\n");
for(i=0;in;i++)
{
a[i]=i+1;
printf("%d ",a[i]);
}
for(i=0,j=n-1;ij;i++,j--)
{t=a[i];a[i]=a[j];a[j]=t;}
printf("\n逆序后的数组:\n");
for(i=0;in;i++)
printf("%d ",a[i]);
printf("\n");
getch();
return 0;
}