问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

用C语言构造3*3素数魔方阵,即找出9个不大于500的素数并排成魔方阵。

发布网友 发布时间:2024-10-06 19:17

我来回答

3个回答

热心网友 时间:2024-10-09 06:07

#include<stdio.h>

int sushu(int n)
{
int i;
if(n==1) return 1;
for(i=2; i<=n; i++)
if(n%i==0) break;
if(n==i) return 1;
else return 0;
}
int wunai(int t, int b, int c, int d, int e, int f, int g, int h, int p)
{
int a[9];
int i, j;
a[0]=t; a[1]=b; a[2]=c; a[3]=d; a[4]=e; a[5]=f; a[6]=g; a[7]=h; a[8]=p;
for(i=0; i<9; i++)
for(j=i+1; j<9; j++)
if(a[i]==a[j]) return 0;
for(i=0; i<9; i++)
if(sushu(a[i])!=1) return 0;
return 1;
}

int main()
{
int i, i1, i2;
static int j=0, n=0;

int a, b, c, d, z;
int ar[500];
for(i=1; i<500; i++)
if(sushu(i)==1) { ar[j]=i; j++;}

for(i=0; i<j; i++)
{
a=ar[i];
for(i1=0; i1<j; i1++)
{
b=ar[i1];
for(i2=0; i2<j; i2++)
{

d=ar[i2];
c=(a+2*b+d)/4;
if((a!=b&&b!=d)&&((a+2*b+d)%4==0)&&sushu(c)==1)
{
z=3*c;
if(wunai(a,b,c,d,z-a-b, z-c-d, z-b-c, z-a-c, z-b-d))
if((z-a-b)>0&&(z-c-d)>0&&(z-b-c)>0&&(z-a-c)>0&&(z-b-d)>0)
{
if((z-a-b)<500&&(z-c-d)<500&&(z-b-c)<500&&(z-a-c)<500&&(z-b-d)<500)
{
printf("%d ", z-a-b);
printf("%d ", a);
printf("%d\n", b);
printf("%d ", z-c-d);
printf("%d ", c);
printf("%d\n", d);
printf("%d ", z-b-c);
printf("%d ", z-a-c);
printf("%d\n",z-b-d);
printf("\n\n");
n++;

if(n==8) return 0;
}
}
}

}
}

}

}

算出8个 如果吧if(n==8) return 0;这句删掉 算的就是 所有的...不过得算上几分钟..

热心网友 时间:2024-10-09 06:13

修宇,你也选了这题啊,我是梁俊,哈哈。。

热心网友 时间:2024-10-09 06:07

不太会
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
你家的水龙头起泡器该换了 如何打开水龙头起泡器 网上卖门锁,安装如何解决 广告装潢需要哪些设备 广告制作需要哪些材料 开锦旗招牌广告制做店须要什么 广告店需要哪些耗材 长安之星发动机水泵要坏之前声音怎么判断 家有孕妇咋调理:280天贴心呵护生健康宝贝图书信息 哪些是适合孕妇看的书 海信电视怎么安装不了第三方应用软件 导致今日股市下跌的原因是什么? 解读今日股市涨跌背后的关键因素 阿尔法·汀香丽舍项目介绍 如图是A、B两支股票在某一交易日内的价格变化情况统计图.有人认为A... ...共收到各类艺术作品1700件。格雷艺术作品的统计情况 如图是A,B两所学校艺术节期间受到的各类艺术作品情况的统计图.已知A学 ... 下图是a.b两所学校艺术节期间收到的各类艺术作品情况的统计图.用一元... 普洱新茶为什么不耐泡? 为什么普洱茶新茶不耐泡? 日本制茶工艺 月牙泉海拔多少米? 鸣沙山月牙泉海拔多少米高 如何清洗纱窗网 1998年世界杯巴西队首发阵容 ...穿刺抽取检查没有脓液也没有血?到底是怎么回事? 肛周脓肿的检查方法 冷棕色需要漂吗 ...语文老师告诉我,不字的用法是什么?不是表示否定词吗?还是反义词? 电脑如何安装whatsappbusiness ...所谓魔方阵是指这样的方阵,她的每一行,每一列和对角线之和相_百度... 输出“魔方阵”。 买了罗技g402,网上一搜发现是g502的阉割版,早知道就加钱上更好的,求 ... 我想买罗技g402的鼠标。要怎么买防止山寨的??有没有推荐的店铺啊?_百 ... ...只显示:私人号码???什么信息都没有又看不见号码,又打不出去???这... 我今天有个未接电话,我打开一看,它只显示了“私人电话”四个字,并且... ...也没有电话号码,然后接了以后就是只有我的回音。我在打过 冰箱冻梨和东北冻梨有哪些区别? 冻梨好吃吗在线等挺急? 冻梨吃起来会有烂水果味吗? 当淘宝进入申请售后淘宝小二介入以后。小二给出的处理意见。淘宝卖家... 为何我挂的全是废单 怎么训练兰波格犬坐下 兰波格犬坐下训练方法 兰波格犬怎么学卧倒 兰波格犬护主怎么训练 兰波格犬握手怎么训练 兰波格犬怎么训练 兰波格犬怎么养 兰波格犬喂养方法 兰波格犬兰波格犬特征 兰波格犬兰波格犬历史