VB任意输入3个整数,找出其中的最大值

#includeintmain(){inta,b=0,c=100;int*pmax,*pmin;scanf("%d",&a);pmax=&b;pmin=&c;while(a!=-1)//输入-1结束{

PrivateSubForm_Click()DimaAsSingle,bAsSingle,cAsSingle,zAsSinglea=InputBox("输入a的值","")b=InputBox("输入

pravitesubcommand1_Click()dimn%n=inputbox("请输入一个整数","输入整数")ifnmod3=0andnmod7=0thenprint"A"elseprint"

inta[500];intn;coutn;intmin,max;for(i=0;i>a[i];min=a[0]a[1]?a[0]:a[1];for(i=0;i

CLSDIMa(10)FORi=1TO10INPUTa(i)NEXTiFORi=1TO9FORj=i+1TO10IFa(i)NEXTj,iPRINTa(1),a(10)end

不知道你a[i]=a[i]什么意思,把它去了吧,没有任何意义!另外没有注意语句的从属关系,注意使用{};以下是修改过的代码!#includemain(){inta[10],i,j,t;intb[10]

#include "stdio.h"int main(){   int count1=0,count2=0,i;&nbs

#includeintmain(){inta[10],i,*maxInt,*minInt;for(i=0;i{printf("输入第%d个整数：\n",i+1);scanf("%d",&

以下代码为输入任意多个数字进行统计如果输入0则退出循环显示出统计结果PrivateSubCommand1_Click()DimiAsIntegerDimqAsIntegerDimoAsIntegerq

http://zhidao.baidu.com/link?url=wyic3NEB45i2K9YZE2SpNiAV4aD7rZHpluBlyF76zg0n_8wr1t6-KOYm6eYY23KqG5n

楼上的,100个数#includemain(){intj=0,k=0,l=0;int*p;inta[100];for(p=a;p

dimiasinteger,nasinteger,sasinteger,kasintegerfori=1to10k=val(inputbox("请输入一个整数："))ifkmod2=1thenn=n+

Private Sub Command1_Click()Dim i As Integer, j As Integer,&

PrivateSubCommand1_Click()Dima,b,cAsIntegerDimmaxRandomizea=Int(900*Rnd+100)b=Int(900*Rnd+100)c=Int(

#includeintmain(void){intmax,min;inta,i;printf("Input10interger:");scanf("%d",&a);max=min=a;for(i=0;

a=XXb=YYc=MMifa>bthenmax=aelsemax=bendififc>maxthenmax=cendif

functionGetData()dimMaxasdouble'最大的数dimminasdouble‘最小的数dimiLasdouble’最大的位置dimalasdouble‘最小的位置dimtota

voidmain(){inti,j,k=0,a,s[50];for(i=0;i

ifxmod2=0thenmsgbox"是偶数"elsemsgbox"是奇数"

建立一个text1、一个command1,代码如下：PrivateSubCommand1_Click()IfNotIsNumeric(Text1.Text)ThenMsgBox("请先在框中输入数字的