网页
资讯
视频
图片
知道
文库
贴吧
地图
采购
进入贴吧
全吧搜索
吧内搜索
搜贴
搜人
进吧
搜标签
日
一
二
三
四
五
六
签到排名:今日本吧第
个签到,
本吧因你更精彩,明天继续来努力!
本吧签到人数:0
一键签到
成为超级会员,使用一键签到
一键签到
本月漏签
0
次!
0
成为超级会员,赠送8张补签卡
如何使用?
点击日历上漏签日期,即可进行
补签
。
连续签到:
天 累计签到:
天
0
超级会员单次开通12个月以上,赠送连续签到卡3张
使用连续签到卡
10月24日
漏签
0
天
vb吧
关注:
156,211
贴子:
1,165,598
看贴
图片
吧主推荐
游戏
13
回复贴,共
1
页
<<返回vb吧
>0< 加载中...
用Basic语言解:-1+2-3+4-5+6-7.....+1994-1995+1996-1997=?
只看楼主
收藏
回复
Mk124
啥也不懂
1
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
用Basic语言解:-1+2-3+4-5+6-7.....+1994-1995+1996-1997=?
大家可以解解看啊~
-----这是我解的-----
i = -1
For o = 1 To 1997
A = A + i
i = -(i + Sgn(i))
Next o
MsgBox A
--------------------
答案得-999
203.95.2.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
Dim i As Integer, hj As Double
hj = 0
For i = 1 To 1997
If i Mod 2 = 0 Then
hj = hj + i
Else
hj = hj - i
End If
Next i
MsgBox hj
218.29.46.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
For i = 1 To 1997
Sum = Sum + (-1) ^ (i) * i
Next i
Print Sum
219.157.75.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
n=1997
if n/2=n\2 then
msgbox n/2
else
msgbox -(1997+1)/2
end if
211.136.158.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
最简单的解法
form1.print "-999"
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
晕那样都成?那最简单的应是:?-999
122.246.128.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
放到什么地方可以计算了啊?
121.228.38.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
Function YunSuan(ByVal num As Long) As Long
If num And 1 Then
YunSuan = (-num - 1) / 2
Else
YunSuan = num / 2
End If
End Function
Private Sub Command1_Click()
MsgBox YunSuan(1997)
End Sub
我感觉这样写运行效率会很
203.192.153.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
Public Function yunsuan(ByVal a As Integer, b As Integer)
Dim c As Integer
For a = 2 To 1996 Step 2
For b = -1 To -1997 Step -2
c = a + b
Next b
Next a
Print c
End Function
阿成的程序,希望能帮助你!..........
58.209.75.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
10楼的效率我测试了下最快 num and 1 是什么意思?
222.69.250.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
我没编程,但我感觉-999不对
220.194.17.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
Msgbox CStr(1997/2 + 1)
116.29.244.*
快试试吧,
可以对自己使用挽尊卡咯~
◆
◆
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
......
前后两个数的差=1
最终的结果是 双数的个数 和 结尾是否是单数...
登录百度账号
扫二维码下载贴吧客户端
下载贴吧APP
看高清直播、视频!
贴吧页面意见反馈
违规贴吧举报反馈通道
贴吧违规信息处理公示