网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
下列程序的功能是求算式:1-1/24-1/3-1/4+…前80项之和。 PrivateSub Commandl Click( ) Dim i asinteger,S assingle.f as integer s=0:f=1 For i=1To 30 s=s+f/i f=__________ Next i Debug.Print”1-1/2+1/3—1/4+…=”:s End Sub 横线处应填写的内容是( )。
A.1*f
B.-l*f
C.1*i
D.-1*i
参考答案
更多 “ 下列程序的功能是求算式:1-1/24-1/3-1/4+…前80项之和。 PrivateSub Commandl Click( ) Dim i asinteger,S assingle.f as integer s=0:f=1 For i=1To 30 s=s+f/i f=__________ Next i Debug.Print”1-1/2+1/3—1/4+…=”:s End Sub 横线处应填写的内容是( )。A.1*fB.-l*fC.1*iD.-1*i ” 相关考题
考题
在窗体上画一个命令按钮,名称为Commandl,然后编写下列程序Private Sub Commandl_Click()For i = 1 To 2For j = 1 To iPrint String(i,"Hello")Next jPrintNext iEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A. H HH HH B. H HHHH C. HHHHH HH HHHH D. H
考题
下列程序的功能是求算式:1+1/2!+1/3!+1/4!+……前10项的和(其中n!的含义是n的阶乘)。请在空白处填入适当的语句,使程序完成指定的功能。Private Sub Commandl_Click ( )Dim i as integer,s as single,a as singlea=1:s=0For i=1 To 10a=_____s=s+aNext iDebug.Print“1+1/2!+1/3!+……=”;SEnd Sub
考题
下面程序的功能是:计算1~20之间的奇数之和与偶数之和,请填空使程序功能完整。 include m
下面程序的功能是:计算1~20之间的奇数之和与偶数之和,请填空使程序功能完整。include<stdio.h>main(){int a=0,b=0,c=0,i;for(i=0;i<=20;i+=2){ a+=i;( );c+=b;}printf("偶数之和=%d\n",A);printf("奇数之和=%d\n",c-21);}
考题
以下程序是计算1 - 1/2 + 1/3 - 1/4 + … + 1/9 - 1/10 的值并输出,请补充完整。S=0K=1T=1DO WHINE K<【 】S=S+T/KK=K+1T= -TLOOPMSGBOX S
考题
下列给定程序中,fun()函数的功能是:根据形参m,计算下列公式的值。t=1-1/2+1/3-1/4+…+(-1)(m+1)/m例如,若输入5,则应输出0.783333。请改正程序中的错误,使它能得到正确结果。注意:不要改动main函数,不得增行或删行,也不得更改程序的结构。试题程序:include <conio.h>include <stdio.h>/*************found*************/int fun(int m){double t=1.0,j=1.0;int i;/*************found*************/for(i=l;i<m;i++){j=-1*j;t+=j/i;}return t;}main(){int m;clrscr();printf("\nPlease enter 1 integer number:");scanf("%d",m);printf("/nThe result is%If\n",fun(m));}
考题
在窗体上面1个名称为Command1的命令按钮,然后编写下列事件过程 Option Base 1 Private Sub,Command1 Click( ) Dim a(5,5)ks Integer For i=1 To j For j=1 To 5 a(i,j)=(i+j)*5\10 Next j Next i S=0 For i=1 To j s=s+a(i,i) Next i Print s End Sub 程序运行后,单击命令按钮,输出结果是( )。A.15B.13C.11D.9
考题
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim() a=Array(”机床”,”车床”,”钻床”,”轴承”)Printa(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承
考题
试题11下列程序的功能是求算式:1-1/2+1/3-1/4+……前30项之和。请在空白处填入适当的语句,使程序可以完成指定的功能。Private Sub Command0_Click()Dim i As Single , s As Single,f As Singles=0 :f=1For i= 1 To 30s=s+f / if=___【11】__Next iDebug.Print “1-1/2+1/3-1/4+……=”;sEnd Sub
考题
下列程序的功能是求算式:1-1/2+1/3-1/4+....前30项之和。请在空白处填入适当的语句,使程序可以完成指定的功能。 Private Sub Command1_Click() Dim i as Integer, s As Single, f As Integer s = 0 : f = 1 For i = 1 To 30 s = s + f/i f =() Next i Debug.Print “1-1/2+1/3-1/4+…=”; s End Sub
热门标签
最新试卷