高校问答燕麦能当晚餐吗:请把三个程序由Pascal 变成C语言程序
来源：百度文库 编辑：高校问答 时间：2024/05/08 05:41:56
for a:=1 to 5 do
for b:=1 to 5 do
for c:=1 to 5 do
for d:=1 to 5 do
for e:=1 to 5 do
if (a+b+c+d+e=15) and (a*b*c*d*e=120) and (a*a+b*b+c*c+d*d+e*e=55) then begin
inc(total);
writeln(a:2,b:2,c:2,d:2,e:2);
end;
writeln('total=',total);
第二个
for a:=1 to 3 do
for b:=a+1 to 4 do
for c:=b+1 to 5 do
begin
inc(total);
writeln(a:2,b:2,c:2);
end;
writeln('total=',total);
第三个
for a:=3 to 6 do
for b:=a+1 to 7 do
for c:=b+1 to 8 do
if (a<b+c) and (b<a+c) and (c<b+a) then begin
inc(total);
writeln(a:2,b:2,c:2);
end;
writeln('total=',total);
for(a=1;a<=5;a++)
for(b=1;b<=5;b++)
for(c=1;c<=5;c++)
for(d=1;d<=5;d++)
for(e=1;e<=5;e++)
if((a+b+c+d+e==15)&&(a*b*c*d*e==120)&&(a*a+b*b+c*c+d*d+e*e==55)){
total++;
printf("%2d%2d%2d%2d%2d\n",a,b,c,d,e);
}
printf("total=%d\n",total);
for(a=1;a<=3;a++)
for(b=a+1;b<=4;b++)
for(c=b+1;c<=5;c++){
total++;
printf("%2d%2d%2d\n",a,b,c);
}
printf("total=%d\n",total);
for(a=3;a<=6;a++)
for(b=a+1;b<=7;b++)
for(c=b+1;c<=8;c++)
if((a<b+c)&&(b<a+c)&&(c<b+a)){
total++;
printf("%2d%2d%2d\n",a,b,c);
}
printf("total=%d\n",total);
_________________________________________________
不好意思，我没有学过Pascal，这些语句好像有点面熟，
所以我就按着自己所想的转化了一下：
_________________________________________________
程序1:
#include<stdio.h>
main()
{int a,b,c,d,e,f=1,total=0;/*程序1*/
for (a=1;a<=5;a++)
{for (b=1;b<=5;b++)
{for (c=1;c<=5;c++)
{for (d=1;d<=5;d++)
{for (e=1;e<=5;e++)
if ((a+b+c+d+e==15)&&(a*b*c*d*e==120)&&(a*a+b*b+c*c+d*d+e*e==55) ){f=0;break;}else total+=1;
if (f==0) break;}
if (f==0) break; }
if (f==0) break;}
if (f==0)break;}
a=2;b=2;c=2;d=2;e=2;
printf("total=%d\n",total);
}
程序2:
#include<stdio.h>
main()
{int a,b,c,total=0;
for (a=1;a<=3;a++)
{for (b=a+1;b<=4;b++)
{for (c=b+1;c<=5;c++)
total+=1; }}
a=2;b=2;c=2;
}
程序3:
#include<stdio.h>
main()
{int a,b,c,f=1,total=0;/*程序3*/
for (a=3;a<=6;a++)
{for((b=a+1); b<=7;b++)
{for(c=b+1;c<=8;c++)
if ((a<b+c)&&(b<a+c)&&(c<b+a)) {f=0;break;}
if (f==0) break;}
if(f==0)break;}
a=2;b=2;c=2;
printf("total=%d\n",total);
}
}