vb编程输入10个整数存入一维数组,再按逆序重新存放后再输出?

来自:    更新日期:早些时候
3.编写程序其功能是:输入10个整数存入一维数组,再按逆序重新存放后再输出。要求用指向数组的指针变量~

#include<stdio.h>
#include<math.h>
int main()
{
int a[10],i;
for(i=0;i<10;i++)
{
scanf("%d",&a<i>);
}
for(i=9;i>0;i--)
{
printf("%d",a<i>);
}
printf("%d",a[0]);
return 0;
}

扩展资料:include用法:
#include命令预处理命令的一种,预处理命令可以将别的源代码内容插入到所指定的位置;可以标识出只有在特定条件下才会被编译的某一段程序代码;可以定义类似标识符功能的宏,在编译时,预处理器会用别的文本取代该宏。
插入头文件的内容
#include命令告诉预处理器将指定头文件的内容插入到预处理器命令的相应位置。有两种方式可以指定插入头文件:
1、#include<文件名>
2、#include"文件名"

#include
void main()
{int a[10],*p,i,j,t;
p=a;
for(i=0;i<10;i++)
scanf("%d",p++);
printf("
");
p=a; //在这对指针重新初始化一下,因为你前面已经改变了p的指向
for(i=0,j=9;i<j;i++,j--)
{t=*(p+i);*(p+i)=*(p+j);*(p+j)=t;} //指针应该这样来用,你那样用有问题
p=a;
for(i=0;i<10;i++)
printf("%d ",*p++);
}



Private Sub Command1_Click()

  Dim a(10) As Integer

  Print "初始的数:"

  For i = 1 To 10

    a(i) = InputBox("请输入第" & i & "个数:")

    Print a(i);

  Next i

  Print

  For i = 1 To 5

    t = a(i)

    a(i) = a(11 - i)

    a(11 - i) = t

  Next i

  Print "逆序重新存放后的数:"

  For i = 1 To 10

    Print a(i);

  Next i

  Print: Print

End Sub



详细要求有没有?


vb编程输入10个整数存入一维数组,再按逆序重新存放后再输出?视频

相关评论:
  • 13990593474vb编程输入10个整数存入一维数组,再按逆序重新存放后再输出?
    仰眨狗Private Sub Command1_Click()Dim a(10) As Integer Print "初始的数:"For i = 1 To 10 a(i) = InputBox("请输入第" & i & "个数:")Print a(i);Next i Print For i = 1 To 5 t = a(i)a(i) = a(11 - i)a(11 - i) = t Next i Print "逆序重新存放后的数:...

  • 13990593474VB从键盘输入10个整数求平均值,最大值,最小值
    仰眨狗输入用input()接收键盘数据接收满10个整数后,用一数组存起来.求平均数的函数是:AVG()求最大值是函数是:MAX()求最小值的函数是:MIN()就行了,不需要其它的.

  • 13990593474VB设计 从键盘输入10个数,要求按从小到大的顺序打印出来。 图片如下...
    仰眨狗1、定义一个用于存放10个整数的一维数组;2、输入第1个数,放到数组的第1个中;3、输入第2个数,与数组中的第1个数比较,如果大,就放入数组的第2个数中;如果小,就将第1个数赋给中间变量,将输入的数放入数组的第1个数中;将临时变量放入数组的第2个数中;4、按此方法输入后面的数,依次...

  • 13990593474VB程序设计,用随机函数产生10个50以内(包括50)的随机整数存入一维数组...
    仰眨狗Private Sub Command1_Click()  Randomize  Dim a(9) As Integer, Max As Integer  Dim k As Integer, i As Integer  Dim t As Integer  Max = 0  For i = 0 To 9    a(i) = Int(Rnd * 51)    Print a(i);&#...

  • 13990593474vb编程题,用随机函数产生10个50以内包括50的随机整数存入一堆数组?
    仰眨狗Private Sub Command1_Click()Dim a(10) As Integer Randomize Print "产生的随机数是:"For i = 1 To 10 a(i) = Int(Rnd * 51)Print a(i);Next i Print x = CInt(InputBox("请输入要查找的数:"))Print "要查找的数是:"; x n = 0 For i = 1 To 10 If x = a(i) ...

  • 13990593474vb中“从键盘输入10个数,按输入的顺序和按输入顺序相反的顺序输出”的...
    仰眨狗Private Sub Command1_Click()Dim a%(9)For i = 0 To 9 a(i) = InputBox("请输入第" & i & "个整数", "输入整数")Text1.Text = Text1.Text & a(i) & Space(3)Next For i = LBound(a) To UBound(a) \/ 2 b = a(i)a(i) = a(9 - i)a(9 - i) = b Next i...

  • 13990593474vb编程例题
    仰眨狗题目好像不全。以下的程序是实现这样的功能:用随机函数产生10个50以内(包括50)的随机整数存入一维数组,从键盘上输入一个数,在数组中查找这样的数,最后返回查找结果:在数组的第几个元素中找到,或是未找到这样的数。Private Sub Command1_Click() Dim a(10) As Integer, x As Integer ...

  • 13990593474vb编程 用for循环向一维数组中输入10个数,找出其中的最大值和最小值...
    仰眨狗Label1.Caption = ""For i = 1 To 10 x(i) = Val(InputBox("输入第“ & i & "个整数", "输入整数", "0"))If i = 1 Then max = x(1) : min = x(1)If x(i) > max Then max = x(i)If x(i) < min Then min = x(i)Label4.Caption = Label4.Caption & x(i)...

  • 13990593474从键盘输入10个整数,存入数组中,找出最大值和最小值所在的位置,将两者...
    仰眨狗void main(){ int a[10];int i,j,min,max,k,temp;for(i=0;i<10;i++)scanf("%d",&a[i]);min=a[0];max=a[0];for(i=0;i<10;i++){ if(maxa[i]){ min=a[i];k=i;} } temp=a[j];a[j]=a[k];a[k]=temp;for(i=0;i<10;++i)printf("%3d",a[i]);} ...

  • 13990593474VB的inputbox怎么实现连续输入10个整数作为数组进行排序操作?
    仰眨狗1、打开VB6.0开发软件,新建一个标准exe工程;2、在设计界面上添加两个Label控件、两个个Text控件和一个Command控件,各控件属性如下图所示;3、双击Command1控件,进入代码编辑界面,输入如下代码:Private Sub Command1_Click()Dim a(10) As IntegerText1.Text = ""Text2.Text = ""For i = 1...

  • 相关主题精彩

    版权声明:本网站为非赢利性站点,内容来自于网络投稿和网络,若有相关事宜,请联系管理员

    Copyright © 喜物网