求1-999之间所有的同构数vb程序

如题所述

举报该问题

推荐答案 2016-02-26

Private Sub Form_click()
Dim n As Integer, m As Integer, num1 As Integer, num2 As Integer
For n = 1 To 100
m = n * n
num1 = Len(Str(n)) - 1
If n = m Mod (10 ^ num1) Then Print n, m
Next
End Sub

温馨提示：答案为网友推荐，仅供参考

当前网址：http://77.wendadaohang.com/zd/YvG8vpN8q8YvI8p8NWp.html

相似回答

编程求1—999之间的同构数;同构数就是指一个数是其平方数的尾部,如25...答：static void Main(string[] args){ Enumerable.Range(1, 999).ToList().FindAll(n => (n * n).ToString().EndsWith(n.ToString())).ForEach(Console.WriteLine);} }

用SQL 2005编程:求出1~999之间所有的同构数(一个数出现在其平方的右侧...答：declare @n int,@m int;declare @t table(同构数 int)set @n=0;while(@n<999)begin set @n=@n+1;select @m= case when @n<10 then 10 when @n<100 then 100 else 1000 end;if (@n*@n-@n)%@m=0 insert into @t values (@n)end select * from @t结果：同构数 1 5 6...

编写程序,求2—999中的同构数(也叫自守数)及其个数。答：答案在下面你可以看看：#include<stdio.h> include<math.h> void main(){ long int a,b,h,i,j,f=0,d;printf("正在计算...\n");for(i=2;i<=999;i++){ a=i*i;for(j=1;j<=3;j++){ d=a%10;a=a/10;f=f+d*pow(10,j-1);if(f==i){ printf("%ld\n",i);} if(...

c语言编一个程序,求2~999之间所有的同构数答：程序如下：include<stdio.h> void main(){ int i,square;for(i=2;i<10;i++)/*求一位数的同构数*/ {square=i*i;if(square%10==i)printf("%d ",i);} for(i=10;i<100;i++)/*求两位数的同构数*/ { square=i*i;if(square%100==i)printf("%d ",i);} for(i=100;i<1000...

用C语言编写程序打印1-999的同构数答：include <bits/stdc++.h>using namespace std; int main(){ for (int i=1;i<=999;i++){ int a=i*i,pow=1; while (pow<=i) pow*=10; if ((a-i)%pow==0) printf("%d %d\n",i,a);} }

2-999之间的所有同构数,在线急等,只要答案,不要程序答：void main(){ long a;int len;char as[10];char ms[20];printf("求[1,10000]中的同构数：\n");for(a=1;a<=10000;a++){ ultoa(a,as,10); /*数a转换为字符串，存入as*/ len=strlen(as);ultoa(a*a,ms,10);if(strcmp(as,right(ms,len))==0) /*比较字符串as与ms长为len...

C#编写程序,找出1---100之间的所有质数答：} Console.WriteLine(); Console.WriteLine("素数总个数:" + number); Console.ReadKey(); } }} 寂静_夜晚 | 发布于2011-12-16 举报| 评论 0 0 为您推荐: 编写程序找出1000 找出100到999水仙花数编写程序打印下列图形编写程序读一条消息编写程序找出5000完数找出1000以内的同构数水仙花数...

大家正在搜

同构数vb程序 c语言求同构数程序 c语言程序设计程序填空题 c语言程序的基本结构 vb退出程序的代码 vb结束程序的代码 1同构数 c语言程序的基本组成部分回文数c语言程序

c语言编一个程序，求2~999之间所有的同构数

求10~999的同构数。

VB编程:求1-100之间得同构数!

求1个VB编程,1-1000的同构数,有没有不分块的方法~~

vb找出2～99间所有同构数

用vb,输出1到999之间的全部同构数

求1-100之间的同构数。c语言。谢谢

VB编程，输出1-1000之间的同构数