1、编写程序，用计时器按秒计时。在窗体上画一个计时器控件和一个标签，程序运行后，在标签内显示经过的秒数，并响铃。2、勾股定理中3个数的关系是：a^2+b^2=c^2。编写程序，输出30以|其它问答-字典翻译问答网

1、编写程序，用计时器按秒计时。在窗体上画一个计时器控件和一个标签，程序运行后，在标签内显示经过的秒数，并响铃。2、勾股定理中3个数的关系是：a^2+b^2=c^2。编写程序，输出30以

1人问答

问题描述：

1、编写程序，用计时器按秒计时。在窗体上画一个计时器控件和一个标签，程序运行后，在标签内显示经过的秒数，并响铃。

2、勾股定理中3个数的关系是：a^2+b^2=c^2。编写程序，输出30以内满足上述关系的正数组合，例如3、4、5就是一个整数组合。

3、从键盘上输入两个正整数M和N，求最大公因子。

4、如果一个数的因子之和等于这个数本身，则这样的数为“完全数”。例如，整数28的因子为1、2、4、7、14，其和为28，因此28是一个完全整数。编写一个程序，从键盘上输出正整数N和M，求出M和N之间的所有完全数。

8、从键盘上输入10个整数，并放入一个一维数组中，然后将其前5个元素与后5个元素对换，即第1个元素与第10个元素互换，第2个元素与第9个元素互换......第5个元素和第6个元素互换。分别输出数组原来各元素的值和对换后各元素的值。

9、有一个nxm的矩阵，编写程序，找出其中最大的元素所在行和列，并输出其值及行号和列号。

10、编写程序，建立并输出一个10x10的矩阵，该矩阵对角线元素为1，其余元素均为0。

11、编写程序，实现矩阵转置，即将一个nxm的矩阵的行和列互换。

牟迎春回答：

网友采纳

　　我也是自学的。看在你没老师的份上给你编了前几题。后面三个题实在不想编了。其实后三个题也很容易。　　1、　　DimIAsLong 　　PrivateSubForm_Load() 　　Timer1.Interval=1000 　　EndSub 　　PrivateSubTimer1_Timer() 　　I=I+1 　　Label1=I 　　Beep 　　EndSub 　　2、　　PrivateSubCommand1_Click() 　　ForI=1To30 　　ForJ=ITo30 　　IfInt(Sqr(I^2+J^2))=Sqr(I^2+J^2)Then 　　IfSqr(I^2+J^2)