inputbox输入一个正整数

#include"stdio.h"intmain(){\x09inti,j,n;\x09inta[12];\x09intmin,mx;\x09scanf("%d",&n);\x09for(i=0;i

第一题答案：OptionExplicitPrivateSubCommand1_Click()DimnAsIntegern=Val(InputBox("请输入一个数"))Ifisprime(n)Then

存在如下问题:1、s重复定义2、i重复定义3、最后一条printf语句少分号4、警告；j定义了,但是没有使用5、你的交换语句a[p]=a[0];只是一个单纯的复制,没有交换.6、警告：main函数返回

PrivateSubcommand1_click()Dimint1AsIntegerint1=InputBox("输入一个整数")Ifint1Mod15=0ThenMsgBox"此数能同时被3和5整除

开始输入两个数吧!#include#includemain(){inti,j,m,n,t,a[100]={0};printf("inputm,n:");scanf("%d%d",&m,&n);for(

这个其实可以用多种方法实现方法1：分离数字法varx,l,s:longint;beginread(x);whilex>0dobeginl:=xmod10;inc(s,l);x:=xdiv10;//当前

#includeintmain(){intn;charch;inti;printf("输入一个10以内的正整数和相应个数的五进制成绩：\n");scanf("%d",&n);for(i=0

#include <stdio.h>void main (){ int a[10]; int i,k=0,n,min,

#includeintmat[10][10];voidmain(){intn,i,j;intok=1;scanf("%d",&n);for(i=0;i

PrivateSubform_load()a=InputBox("","输入一个数","")IfIsNumeric(a)ThenIfaMod15=0ThenMsgBoxa&"能被3和5同时整除"Els

使用了数组的动态分配,看不懂的话我还有其他方案#include#includeboolprime(intnum){boolflag=true;if(num

法一：这个方法的思路很直接,数学味较浓.既然在VB6中没有阶乘的运算,那么我就自己造一个函数用来算一个整数的阶乘.FunctionTimeStep(NumberAsInteger)AsLongTime

for(i=0;imax)max=a[i];a[i]=a[n-1];a[n-1]=max;for(i=0;i

Dim a As Singlea = Val(InputBox("输入摄氏"))a= a * 9/5

inti=0;intn,t,sum=0;scanf("%d",&n);while(i

#includeintmain(void){intn=0,m=0,i=0,j=0,k=0;scanf("%d",&n);while(n--){\x09scanf("%d",&m);\x09for(j=

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

for(k=0;ka[i-1]){n_temp=a[i];a[i]=a[i-1];a[i-1]=n_temp;}}}

最大值与最后一个交换,需要使用到max和a[i],以及一个临时变量,你代码中使用的是maxa[0]a[i],这里貌似有点问题.最小值与第一个交换,貌似你也是用的这3个变量.如果觉得使用的变量过多,可以

因为你在fact和multi两个函数里,用的product是int型.在item还没达到精度要求的时候,product就溢出了,此时导致item变成了负数,于是退出了while循环.解决办法是把这两个