60以内的勾股数有多少组?

今天考VB2级上机编的程序是求60以内的勾股数有多少组,我求出来是26组
不知道对不对。。。。。。
恩,应该是包括60,是VB不是C语言,而且3.4.5和4.3.5算一组,
所以我加了一个if a>b...求出来是26

共17组,它们是
a b c
(01) 3 4 5
(02) 8 6 10
(03) 5 12 13
(04) 15 8 17
(05) 12 16 20
(06) 7 24 25
(07) 24 10 26
(08) 21 20 29
(09) 16 30 34
(10) 35 12 37
(11) 32 24 40
(12) 9 40 41
(13) 27 36 45
(14) 48 14 50
(15) 20 48 52
(16) 45 28 53
(17) 40 42 58
公式:a=m^2-n^2,b=2mn,c=m^2+n^2
m,n是正整数,m>n,m^2+n^2≤60即可
温馨提示:答案为网友推荐,仅供参考
第1个回答  2006-09-24
我求也是26组
for i = 1 to 60
for j= 1 to i
for k= j to i
if j^2+k^2=i^2 then js=js+1
next k
next j
next i本回答被提问者采纳
第2个回答  2006-09-26
for(int i = 1 ; i <= 60 ; i ++)
for(int j =1 ;j <=60 ;j ++)
for(int k =1; k <= 60 ;k++)
{
if( i * i ==(j * j + k * k))
cout << i << " " <<j << " " << k << endl;
第3个回答  2006-09-24
题出的不太好.60以内?有没有60呀?
要是包括60就有26组.
要是不包括60就25组.
第4个回答  2006-09-24
for(int i = 1 ; i <= 60 ; i ++)
for(int j =1 ;j <=60 ;j ++)
for(int k =1; k <= 60 ;k++)
{
if( i * i ==(j * j + k * k))
cout << i << " " <<j << " " << k << endl;
}自已运行一下吧,自已看吧
相似回答