搜索
首页 游戏 盛大游戏 传奇世界

在线等..急..VB高手进..

编定程序,判断一个正整数(>=3)是否为素数

全部回答

2006-02-12

0 0

    程序如下。。
     Sub Form_Click() Dim n As Integer n = InputBox("请输入一个正整数(>=3)") k = Int(Sqr(n)) i = 2 Swit = 0 While i<= k And Swit = 0 While i<= k And Swit = 0 If n Mod i= 0 Then Swit = 1 Else i = i+1 End If Wend If Swit = 0 Then Print n;"是一个整数" Else Print n;"不是整数" End If End Sub。

2006-02-12

30 0

你问错地方了~~ 仅管我二级学过VB~~不过都忘光了~~

类似问题换一批

热点推荐

热度TOP

相关推荐
加载中...

热点搜索 换一换

游戏
传奇世界
电视游戏
完美游戏
腾讯游戏
网页游戏
巨人游戏
桌上游戏
网络游戏
网易游戏
盛大游戏
百度游戏
久游游戏
单机游戏
光宇游戏
手机游戏
掌机游戏
金山游戏
小游戏
盛大游戏
传奇世界
泡泡堂
永恒之塔
功夫小子
疯狂赛车
热血英豪
苍天
梦幻国度
传奇外传
热血传奇
冒险岛
龙之谷
彩虹岛
超级跑跑
传奇世界
传奇世界
举报
举报原因(必选):
取消确定举报