vb编写100以内不能被6但能被3整除的数,每行输出五个,并求和

如题所述

举报该问题

第1个回答 2014-05-27

Dim i As Integer, n As Integer, s As Integer
For i = 0 To 100
If i Mod 6 <> 0 And i Mod 3 = 0 Then
s = s + i
Print i;
n = n + 1
If n Mod 5 = 0 Then Print
End If
Next
Print
Print "和为"; s

相似回答

vb 程序:计算1-100之间所有能被3整除的数之和答：include <stdio.h>int main(){int i, sum_3 = 0, sum_5 = 0;for (i = 1; i <= 100; ++i){if (i % 3 == 0){sum_3 += i;}if (i % 5 == 0){sum_5 += i;}}printf("1-100之间能被3整除的所有数字之和:%d\n", sum_3);printf("1-100之间能被5整除的所有数字...

VB输出100以内能被3整除的数之和答：因为100中有33个数能整除3 所以2M=102*33 所以M=51*33

编写出程序代码段输出1到100之间能被3整除的整数答：在VB中编写程序，输出1到100之间能被3整除的整数，代码如下：Dim i As Integer For i = 3 To 100 If i Mod 3 = 0 Then Print i End If Next 这段代码简洁明了，直接实现了功能需求。使用了For循环，从3开始到100结束，每一步递增1。在循环体内，通过If语句判断当前数字i是否能被3整除，如...

求出100以内的能被3整除的数的个数以及这些数之和并输出这些数用vb程...答：dim a,s,n as integer for a=1 to 100 if a mod 3=0 then print a s=s+a n=n+1 end if a=a+1 next a print n,s 'n为个数，s为和这样行了吧，其实只是换了一种循环结构，中间判断a是否被3整除都一样

编写VB程序将1到100自然数中同时被3和5整除的数打印出来,并统计其个数...答：msg =msg & i & "是奇数"Else msg =msg & i & "是偶数"Next i Print msg 能被3和5同时整除:For i = 1 to 100 If i/3 = i\3 And i/5 = i\5 Then msg =msg & i & "能被3和5同时整除"Else msg =msg & i & "不能被3和5同时整除"End If Next i Print msg ...

速求怎么用VB做程序:0~100之间能被2或3整除的所有数之和?答：然后双击按钮，编写按钮的点击事件代码Dim i As Integer Dim sum As Integer sum = 0 For i = 0 To 100 If i Mod 2 = 0 Or i Mod 3 = 0 Then sum = sum + i End If Next MsgBox "0~100之间能被2或3整除的所有数之和为：" & sum, vbOKOnly + vbInform...

用VB如何写1到100之间所有能被3整除而不能被7整除的整数的和与个数的...答：VB代码如下：Dim i, jj = 0For i = 1 To 100If (i Mod 3 = 0 Or i Mod 7 = 0) And i Mod 21 <> 0 ThenPrint i,j = j + 1If j = 7 ThenPrintj = 0End IfEnd IfNext i

VB.求出0~100的整数能够被3整除的个数以及能够被7整除的个数。程序...答：和 dim count as integer'个数 sum=0 count=0 text3.text=""For i=1 to 100 If i Mod 3=0 And i Mod 7<>0 Then count=count+1 sum=sum+i text3.text=text3.text & i'text3显示都有什么数 End If Next text1.text="和为:"+ sum text2.text="个数为:"+coun end sub ...

用VB写1到100以内能被3或7整除的数之和. 在线等,急答：Private Sub Command1_Click()For i = i To 100 If i Mod 3 = 0 Or i Mod 7 = 0 Then s = s + i End If Next i Print "能被3或都7整除的数之和为" & s End Sub

大家正在搜

用vb编写简单的程序吃了vc和vb能喝酒吗 vb怎么编写 vb用什么软件编写 vb和c语言哪个难 vb编程能做什么 vb0最大能表示字节vb0最大能表示 vb编译器

计算机VB编程题输出100～200不能被3整除的数，每行输...

VB编写程序输出100以内能被3整除且个位数为6的所有整数...

vb题输出100∽500之间既不能被3整除也不能被5整除的数...

编程实现,通过程序输出100以内个位数为6且能被3整除的所有...

用VB编写程序输出1～100之间不能被3整除的数,并统计其个...

输出100到200之间能被3整除不能被4整除的数并求和，c程...

求VB编程：输出100~200间所有不能被3整除的数并求和...

C语言编程问题：输出100以内个位数为6且能被3整除的所有数...