VB输入一个正整数,将其各位数字按逆序输出,例如输入1234,输出4321..

先除以10,输出余数,再除以100,输出余数……while(s/a!=0){printf("%d",s%a);a=a*10;}

#includeintmain(){inta,sum=0;scanf("%d",&a);while(a){sum+=a%10;a/=10;}printf("sum=%d\n",sum);return0

#include#includeintmain(){intn,r,i,t,b;chara[100];charc[]="ABCDEFGHIJKLMNOPQRSTUVWXYZ";//a数组用储存转后每位的

DimXAsInteger这句出的毛病.你直接把它定义成整数型变量,输入3.5直接四舍五入转换为4.把它换成DimXAsSingle

给你写个拆整数的代码,最大与最小自己去写,多练练：#includevoidmain(){intn,i=0,a[100],m=0;scanf("%d",&n);while(n!=0){a[i]=n%10

#includeintmain(){intm[10],i,j=0,k;longn;scanf("%ld",&n);k=n;while(k>0){k/=10;j++;}i=j;while(i--){m[

规定利用Mod跟“/”来编码廷垃圾的,本来两个函数就搞定了.PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegerDimiAsInt

问题好像还没有结束啊,补充一下吧intA=rnd()*10000intB=val(mid(intA,4,1)&mid(intA,3,1)&mid(intA,2,1)&mid(intA,1,1))int

privatesubcommand1_click()dimi,j,nn=val(inputbox("n="))ifIsPrime(n)thenprintn&"是素数."elsefori=n+1ton+

DimnAsInteger,iAsIntegerDimflgAsBooleann=Val(Text1.Text)n=n+1Fori=2ToSqr(n)IfnModi=0ThenExitForNexti

代码：#include <stdio.h>int sum(int n){\x05int s = 0;\x05while(n>

这个地方会是死循环for(i=0;;i++){if(a/pow(10,i)>=1){n++;}没有循环结束语句,那么什么时候会结束呢?也就是说下面的语句其实都没有执行.----------------

界面用一个listbox和一个commandbutton,代码为：OptionExplicitPrivateSubCommand1_Click()DimiAsInteger,jAsIntegerDim

//提示：153370371407是水仙花数#includevoidmain(){inti,j,k,n;printf("请输入一个三位整数\n");scanf("%d",&n);i=n/100;/*分

PrivateSubCommand1_Click()d=Val(Text1)Print100*(dMod100)+Int(d/100)EndSu

编程:输入一个3位正整数,正确分离出其个位、十位、百位数...一年四季行好运八方财宝进家门家和万事兴春雨丝丝润万物红梅点点绣千山春意盎然

PrivateSubForm_Click()DimxAsStringDima%,b%,c%,y%x=InputBox("请输入三位数","提示框")IfLen(x)=3Thena=Val(Mid(x,

'楼主您好!'在窗体上画一个按钮,一个文本框'代码如下：Option ExplicitDim intNumber1 As Long,&n

#includevoidmain(){inti,n;printf("pleaseinputn:");scanf("%d",&n);printf("%d=",n);for(i=2;i

Modulemodule3SubMain()DimnumAsIntegerDimiAsIntegerConsole.Write("请输入一个正整数：")num=Integer.Parse(Consol