输入一个正整数n(1<n<=10),再输入n个整数存入一维数组,按逆序重新存放数

组元素后再输出
急用!谢了

dim d() as integer
dim n as integer
dim i as integer
dim j as integer
dim temp as integer
'输入一个正整数n(1<n<=10)
n = Val(InputBox("输入一个正整数[2,10]:"))
Do While n < 2 Or n > 10
n = Val(InputBox("输入一个正整数[2,10]:", "输入错误,请重新输入!"))
Loop

ReDim d(n)
'输入n个正整数保存到数组
For i = 1 To n
d(i) = Val(InputBox("输入第" & i & "数据:"))
Next i

'逆序重新存放
For i = 1 To n - 1
temp = d(n)
For j = n To i + 1 Step -1
d(j) = d(j - 1)
Next j
d(i) = temp
Next i

'输出
For i = 1 To n
Print d(i),
Next i
Print
温馨提示:答案为网友推荐,仅供参考
第1个回答  2016-04-25
#include <stdio.h>
void main( )
{
int ri,repeat;
int a[10];

scanf("%d", &repeat);

for(ri=0; ri<repeat; ri++)
scanf("%d", &a[ri]);

for(ri=repeat-1; ri>=0; ri--)
printf("%d ", a[ri]);

printf("\n");
}本回答被网友采纳
第2个回答  2016-04-25
先说明编程语言。追问

c语言

相似回答