the+subtropical+zone

@谯郊5794：编写程序:根据公式:1 - 2+3 - 4+5…+n;输入一个正整数,根据公式求和sum -
步夜15068417793…… 1-2=-1,2个数字产生1个-1,即,和为-1 1-2=-1,3-4=-1,4个数字产生2个-1,即,和为-2 1-2=-1,3-4=-1,5-6=-1;6个数字产生3个-1,即,和为-3 n个数字产生n/2个-1,即,和为-n/2

@谯郊5794：这些文件夹里,各有一张图,我现在想把里面图的名称改为现在文件夹的 -
步夜15068417793…… 可以进行重命名.SubfolderTools,只需要简单点击指定好文件夹的路径和命名的模式,它就能帮助你创建和重命名多个文件夹.SubfolderTools:http://www.downxia.com/downinfo/26555.html

@谯郊5794：java或者c/c++,用类显示更大的数. -
步夜15068417793…… #include #include #includ...

@谯郊5794：vb一个数如果恰好等于它的因子之和,这个数就称为＂完数＂.例如6=1+2+3.编程 找出1000以内的所有完数. -
步夜15068417793…… Private Sub command1_Click() Text1 = ＂＂ For n = 1 To 1000 For i = 1 To n / 2 If n Mod i = 0 Then s = s + i End If Next If s = n Then Text1 = Text1 & ＂ ＂ & n s = 0 Next End Sub

@谯郊5794：前辈们 先谢了 急求 用VB程序语言写出完整程序段:求S=1+3+5+7+……+999的值 -
步夜15068417793…… dim i as integer,s as long for i=1 to 999 step 2 s=s+i next i print s 把这段代码放在任意事件中,运行即可.

@谯郊5794：试用VB程序语言写出主要程序段:求S=1+3+5+7+……+999的值. -
步夜15068417793…… Private Sub Command1_Click() For i = 1 To 999 Step 2 s = s + i Next i Print ＂s=＂ & s End Sub

@谯郊5794：编写程序,计算下面数列的和s,当某项((n+1)/n)的值小于1.01时求和终止并输出,要求结果保留3位小数. -
步夜15068417793…… Private Sub Form_Click() Dim n As Integer, s As Long s = 0 n = 1 Do While ((n + 1) / n) >= 1.01 s = s + ((n + 1) / n) n = n + 1 Loop Print s End Sub 要多自己动手

@谯郊5794：编写一个程序,单击窗体实现求S=1+2+3+……+100的值.要求直接在窗体上输出1+2+3+……+100=S的最终结果 -
步夜15068417793…… Private Sub Form_Click() s = 0 For i = 1 To 100 s = s + i Next i Print ＂1+2+...+100=＂; s End Sub

@谯郊5794：VB程序语言写出完整程序段:求S=1+3+5+7+……+999的值 -
步夜15068417793…… dim b% private sub form_load() b=(1+999)*(999-1)/4 msgbox b end sub