老虎吃人真实视频17年:vb求同构数
来源:百度文库 编辑:高考问答 时间:2024/04/26 17:03:34
添加一窗体,在窗体加入一按钮,按钮的标题(caption)为开始计算,窗体的标题(Caption):求同构数
for i=0 to 100000
m=val(right(str(i^2)))
if m=i then msgbox i & " 是同构数"
next
高考问答是一部内容开放、自由的互动网络百科全书
客观、专业、权威的知识性百科全书
来源:百度文库 编辑:高考问答 时间:2024/04/26 17:03:34
for i=0 to 100000
m=val(right(str(i^2)))
if m=i then msgbox i & " 是同构数"
next