新人vb求守形数教

点击联系发帖人 时间：2019-04-13 15:13

vb求守形数

首先你判断守型数的那个函数是錯的你只判断了N平方数的最后一位跟N是否一样，当然只能找个个位数的守型数了因为当N位数为两位以上时（比如25）他的平方数是625，在伱拿625的最后一位5跟他比较当然不一样正确的应该是取最后2位（2即25的位数）。正确的函数应该是：

然后你command1里的代码也要改改一方面不够簡洁，还有你是找1-2000内的而你代码却是1-100范围的守型数。

你应该是没考虑 i的位数写了一个供参考，改别人的代码太费事

下载百度知道APP抢鮮体验

使用百度知道APP，立即抢鲜体验你的手机镜头里或许有别人想知道的答案。

}

设a为一整数如果能使a²=xxa成立，则稱a为“守形数”例如5²＝25，25²＝625则5和25都是守形数。试编写一个Function过程Automorphic其形参为一正整数，判断其是否为守形数然后用该过程查找1－1000内的所有守形数。

解：根据守形数的定义如果对一个数的平方用10的幂求模（Mod）的结果仍为该数，则这个数就是守形数例如，5的平方是25而25 Mod 10 ＝5 ,因此5是一个守形数。据此编写Automorphic过程如下。

'这里在窗体事件中调用过程

运行此程序点击窗体，出现结果如下图所示。

visual basic程序设计教程苐四版答案刘炳文编著

}

确认一键查看最优答案？

本功能为VIP专享开通VIP获取答案速率将提升10倍哦！

小弟实在太菜了，这种问题也要问但还是请各位大虾帮个忙吧。谢谢了

这个就要用到算法了.建议你先把大学的"高等数学"里面的导数和微分的建立推导过程好好看一下,然后就照着做就OK了

按算法写个程序,然后就可以算了吧.

请参看《计算方法》一书

匿名用户不能发表回复！

}