关闭

关闭

关闭

封号提示

内容

首页 水仙花数.doc

水仙花数.doc

水仙花数.doc

上传者: 一颗不背叛的心_ 2017-10-19 评分 0 0 0 0 0 0 暂无简介 简介 举报

简介:本文档为《水仙花数doc》,可适用于考试题库领域,主题内容包含水仙花数PrivateSubCommandclick()DimintNumAsIntegerDimintaAsInteger,intbAsInteg符等。

水仙花数PrivateSubCommandclick()DimintNumAsIntegerDimintaAsInteger,intbAsInteger,intcAsIntegerForintNum=Tointa=intNum'µÃµÙÎÉϵÄÊýÖintb=(intNum)Mod'µÃµÊÎÉϵÄÊýÖintc=intNumMod'µÃµöÎÉϵÄÊýÖIfintNum=inta^intb^intc^ThenPrintintNum"ÊÇËÏÉ"EndIfNextEndSub

职业精品

用户评论

0/200
    暂无评论

精彩专题

上传我的资料

热门资料

资料评价:

/1
0下载券 下载 加入VIP, 送下载券

意见
反馈

返回
顶部