请用VB中的Forc语言程序编辑器编辑程序

用vb语言编写一个程序,将任意一个正整数N的立方分解为N个连续的奇数之和.
用vb语言编写一个程序,将任意一个正整数N的立方分解为N个连续的奇数之和.要求这语句中有运用到子函数或子过程.
Private Sub Form_Click()Dim i,n,tempn = Val(InputBox("N","",10)) ^ 3For i = 1 To n Step 2temp = fc(i,n)NextMsgBox temp & "=" & nEnd SubFunction fc(i,n) As StringDim j,s,tempFor j = i To n Step 2s = s + jfc = fc & j & "+"If s = n Theni = nfc = Left(fc,Len(fc) - 1)Exit ForEnd IfIf s > n Then Exit ForNextEnd Function
我有更好的回答:
剩余:2000字
与《用vb语言编写一个程序,将任意一个正整数N的立方分解为N个连续的奇数之和.》相关的作业问题
dim n as integer dim s as intgerPrivate Sub Command1_Click()Don = n + 1s = s + nLoop untill s>=30000Print n - 1End Su
第一题:Private Sub Command1_Click()Dim a!, b!, c!, d!, x!a = Text1.Textb = Text2.Textc = Text3.Textd = Text4.Textx = Text5.TextLabel1.Caption = f(a, b, c, d, x)End
公倍数,余下的,再装到其中一种盒子中. 再问: 。。。。这 就是不知道肿么编啊 程序死了N次了 对信息真心要没信心了 怎么编啊?
Private Sub Command1_Click() Dim s$, i%, sMax$, sArr$() s = InputBox("任意输入一个英文句子", "输入英文", "Hello, this is a test command!") s = Replace(s, ",", " ") '处理一些符号 s
#include int main(){ scanf("%d", &n); do { printf("%d", n % 10); }while(n /= 10); printf("\n"); return 0;}
private sub command1_click()dim maxfor i = 1 to 3n=val(inputbox("输入第" & i & "个数"))if n>max thenmax =nend ifnextprint "三个数中最大的数是" & max
static void BubbleSort(int a []){ int temp=0; for (int i = 0; i < a. i++) { for (int j = 0; j a[j + 1]){ //把这里改成大于,就是
使用什么VB的话是 INPUT NIF N\2=0THEN PRINT'是'ELSE PRINT'否'END IFEND
num!=-1的意思是num不等于-1在for()的格式为:for(循环变量赋初值;循环条件;循环变量增值)这三个值理论上都可以省略,这个程序中的循环条件是num!=-1成立,也就是说当num不等于-1成立时执行循环,num不等于-1不成立(即num=-1)时跳出循环.
#include&&stdio.h&void&mian(){&&&&int&n;&&&&printf(&Enter&n:&);&&&&nb
INPUT xa=xMOD2IF a=0 THENPRINT "x是偶数"ELSE PRINT "x是奇数"END IFEND
private sub form_click()dim n as long,sn as longn=inputbox("请输入n")for i=0 to nsn=sn+2*i+1nextmsgbox "1+3+5+...(2*" & n & "+1)=" & snend su
#include"stdio.h"void main(){int i,j,k,n,a[25];printf("请输入一个数:\n");scanf("%d",&k);if(k/2==(float)k/2)\x05 printf("是偶数\n");else printf("是奇数\n");if(k>9)for(i=1,j=
#include "stdio.h"#define PI 3.14159int main(){float nR;float nAprintf("请输入圆的半径:");scanf("%f",&nR);nArea = PI*nR*nR;printf("圆的面积是:%f\n",nArea);return 0;}
Private Sub Command1_Click() n = InputBox("请输入n:") s = 1 For i = 1 To n s = s * i Next i Print "n!=" & sEnd Su
#includemain(){int i,j,k,n;scanf("%d",&n);if(n
#include&&stdio.h&struct&student{\x09char&cord[10];\x09double&cj[5];\x09double&\x09int&};double&input(student
public class Test { public static void main(String args[]) { System.out.println(getSum(123)); } public static int getSum(int num) { int a = num % 1以下试题来自:
单项选择题VB是一种面向对象的可视化程序设计语言,采取了()的编程机制。
A.按过程顺序执行
B.按模块顺序执行
C.事件驱动
D.从主程序开始执行
为您推荐的考试题库
您可能感兴趣的试卷
你可能感兴趣的试题
A.在窗台上显示的方法
B.文件的写语句
C.子程序明
D.以上均不是
A.按下键盘上的任意一个键都会触发KeyPress事件
B.大键盘上的&1&键和数字键盘的&1&键的KeyCode码相同
C.大键盘上的&1&键和数字键盘的&1&键的KeyAscii码相同
D.KeyDown和KeyUp的事件过程中都有KeyAscii参数
D.显示出错信息vb编写程序代码。用for to_百度知道
vb编写程序代码。用for to
虎妈猫爸》中,茜茜期中考试考了80分,姥爷为了激励茜茜发奋学习,设立了奖励机制:下次考试多考1分,奖励10元;多考2分,第1分奖励10元,第2分奖励20元;多考3分,第1分奖励10元,第2分奖励20元,第3分奖励30元,以此类推。结果茜茜考了95分,问姥爷奖励她多...
我有更好的答案
Private Sub Command1_Click()Dim n As IntegerDim Money As IntegerFor n = 81 To 95
Money = Money + (n - 80) * 10Next nPrint MoneyEnd Sub
唔O(∩_∩)O谢谢,不过好像有点问题。要用两个循环语句。其实应该用do while。不过考试考完啦,真题没那么难,谢谢你。
为您推荐:
其他类似问题
您可能关注的内容
程序代码的相关知识
&#xe675;换一换
回答问题,赢新手礼包&#xe6b9;
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。《程序设计语言VB》试卷含答案_百度文库
赠送免券下载特权
10W篇文档免费专享
部分付费文档8折起
每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员,立省24元!
《程序设计语言VB》试卷含答案
&&《程序设计语言VB》试卷含答案
阅读已结束,下载本文需要
想免费下载本文?
定制HR最喜欢的简历
下载文档到电脑,同时保存到云知识,更方便管理
&#xe64e;加入VIP
还剩2页未读,
定制HR最喜欢的简历
你可能喜欢

我要回帖

更多关于 r语言程序编辑器 的文章

 

随机推荐