




已阅读5页,还剩11页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、取出一个十进制正整数中的所以奇数数字,用这些数字构成一个最小数。INCLUDEINCLUDEVOIDSORTINTA,INTNINTI,J,TFORI0IAJ1TAJAJAJ1AJ1TLONGARRANGELONGS/ARRANGE函数的功能是取出十进制整数S中的所有奇数数字,用这些数字构成一个最小数,函数返回该数/INTD,B10,I,J0LONGS10WHILES0/利用循环对S数位分离,分离出个位、十位、百位等各位上的数/DS10IFD20/判断每一位上的数字是否为奇数/BJD/若为奇数则存放到B数组中/S/10SORTB,J/调用SORT函数,将数组B从小到大排列/FORI0IINCLUDEINCLUDEVOIDFUNCHARA,CHARB,CHARC/函数功能是先将B指向的字符串逆序存放,然后按A0,B0,A1,B1的顺序合并A字符串和B字符串到C指向的数组中,将A或B中剩余的字符拼接在C数组的尾部/INTI,JCHARCHI0JSTRLENB1WHILEIINCLUDEDEFINEN5VOIDCHANGEINTAN,INTN/该函数的功能是,对A指向的N行5列数组中的矩阵进行变换/INTI,J,TFORI0IAIJ1AI1JRETURN0/若矩阵不是MONGE矩阵,函数返回0/RETURN1/若矩阵是MONGE矩阵,函数返回1/VOIDMAININTAN10,17,13,28,23,17,22,16,29,23,24,28,22,34,24,11,13,6,17,7,45,44,32,37,23/数组初始化/INTMONGE,I,JFILEFPFPFOPEN“MYF2OUT“,“W“/以只写“W“方式打开文件/IFFPNULLEXIT0MONGEMONGEA,5/调用MONGE函数对A数组进行判断/FORI0IINCLUDEDEFINEN100INTFUNINTA,INTB,INTNINTI,J,X,Y,Z,S,T,M,K0FORI0IAISAIAIS/求AI和S的绝对值得到T/XT/100YT/1010ZT10MZ100Y10X/交换T的百位数字与个位数字得到M/IFTM1089/判断T与M的和是否为1089/BKIRETURNK/函数返回数组B中数据的个数/VOIDMAININTAN123,765,1,45,121,1345,131,67,696,3589,BN,N,IFILEFP/定义文件指针/IFFPFOPEN“MYF2OUT“,“W“NULL/以只写“W“方式打开文件/PRINTF“THEFILECALLNOTOPEN“EXIT0NDOTESTA,B,10/用A数组作为实参调用FUN函数/FORI0IINCLUDEDEFINEN7VOIDMERSENNELONGA,INTMINTPRIMELONGVOIDMAINLONGANINTIFILEFP/定义文件指针/FPFOPEN“MYF2OUT“,“W“/以只写“W“方式打开文件/IFFPNULLEXIT0MERSENNEA,N/调用MERSENNE函数,找出并保存前7个MERSENNE数/FORI0IINCLUDEINTLINKRUNINTA,INTB,INTPVOIDMAININTI,A,B,MAX,P100FILEFPIFFPFOPEN“MYF2OUT“,“W“NULL/以只写“W“方式打开文件/PRINTF“THEFILECALLNOTOPEN“EXIT0PRINTF“ENTERA,BANUMNUMPI/求出数组中最大值/RETURNNUM/返回最大值/7、将一个十进制整数M转换成R进制整数的字符串表示形式INCLUDEINCLUDEVOIDTRDECCHARSTR,INTIDEC,INTIBASE/该函数的功能是,将十进制整数IDEC转换为IBASE进制的字符串表示形式/CHARCHINTI,IDR,K0WHILEIDEC0IDRIDECIBASE/IDEC对IBASE求余/IFIDR10/判断余数,根据余数的值对其进行变换/STRKIDR10AELSESTRKIDR0IDEC/IBASEFORI0IINCLUDEINTNVOIDINSERTINTP,INTX,INTNINTI0,JWHILEXPIJPJPJ1PJX/此语句的作用是将X插入到元素PJ的位置/INTCREATEINTHEAD,P,IPRINTF“NN“SCANF“D“,HEADINTMALLOCNSIZEOFINT/分配内存空间函数MALLOC的调用形式错误,正确的为(类型说明符)MALLOCSIZE/PRINTF“ENTERNUMBERS“PHEADFORI0IINCLUDEINCLUDE/后续程序调用了字符函数ISALPHA,所以要加INCLUDE/VOIDREPLACE_WORDCHARSCHARWORD_TAB410“SAD“,“HAPPY“,“ACCUSE“,“FORGIVE“CHART10,TMP80/由后面的TKSJ知,此处定义的T不是一个字符变量,而是一个字符型数组/INTI,J,K,NFORI0SIIFORJI,K0ISALPHASJK,JTKSJTK0IFK0FORN0NINCLUDEINTFACTORINTN/该函数的功能是,求整数N的所有因子之和/INTI,S0FORI1IINCLUDEINCLUDEINCLUDEINTPRIMEINTN/该函数的功能是,判断整数A是否素数/INTIFORI2IINCLUDEINTPRIMEINTA/该函数的功能是,判断整数A是否是素数/INTK,IIFA1RETURN0IFA2RETURN1/A等于1和2时单独考虑/FORI2IINCLUDEINCLUDEVOIDSORTINTA,INTN/将数组A中的N个整数进行从大到小排列/INTI,J,K,TFORI0IAKKJIFKITAKAKAIAIT/利用中间变量T交换两者的值,最后将数组按从大到小的顺序进行排列/LONGFUNLONGSINTD,B10,I,J0LONGS10WHILES0/利用WHILE循环对数据S进行各位数字各位的分离/DS10IFD20/判断各位是否为偶数,若是偶数则将其保存到数组B中/BJDS/10SORTB,J/调用函数SORT对B数组中存放的J个偶数进行排序/FORI0IINCLUDEINCLUDEDEFINEN10INTTROITSKYLONGA/该函数的功能是,求出1000000以内所有的TROITSKY数/INTCOUNT0,BLONGN,N1FORN1N0BN1/10/确定数N的位数,求得数N的首位数字/N1NLONGPOW10,B110N/LONGPOW10,B1/将首位作为个位,其他三位数乘以10组成新的整数/IFN1/NDOUBLEN1/N/将符合要求的数存入数组A中/RETURNCOUNT/函数返回TROITSKY数的个数/VOIDMAINLONGAN,IINTKFILEFP/定义文件指针/FPFOPEN“MYF2OUT“,“W“/以只写方式“W“打开文件/IFFPNULLEXIT0KTROITSKYA/调用TROITSKY函数/FORI0IINCLUDEINCLUDEINCLUDEINTFIBONPRIMELONGF,INTNINTI,M0LONGA401,1,J,KFORI2IK1FMAI/将素数存放到数组K中/RETURNM/数组中素数的个数作为函数值返回/MAININTI,MLONGF40FILEFP/定义文件指针/FPFOPEN“MYF2OUT“,“W“/以只写方式“W“打开文件/IFFPNULLPRINTF“CANNOTOPENDEFILEN“EXIT0MFIBONPRIMEF,30/调用函数FIBONPRIME求出FIBONACCI数列前30个数中的素数/FORI0IINCLUDEVOIDSUMFACINTX,INTNINTFACINTNMAININTI,A101,2,4,8,16,32,64,128,256,512FILEFP/定义文件指针/IFFPFOPEN“MYF2OUT“,“W“NULLPRINTF“CREATFILEMYF2OUTFAILEDN“EXIT0SUMFACA,10/调用函数SUMFAC对一维数值中的数列进行变换操作/PRINTF“N“FPRINTFFP,“N“FORI0IKI/利用循环,从后向前遍历数列查找超完全数/SUMFACXI/调用FAC函数求得各元素的所有因子之和/IFFACSUMXI2/利用IF判断其是否是超完全数/MXIFORJIJ0JXJXJ1/移动超完全数之前需将数列所有数依次后移/X0M/将超完全数移动到数列的第一个位置/KI17、编写函数INTDELFINDGEDINTA,INTN,INTFINCLUDE“STDIOH“INCLUDE“CONIOH“INTDEL_FINDGCDINTA,INTN,INTFINTI,K,GFORI0,K0IGKKGELSEGGKFK/保存最大公约数到F指向的变量中/RETURNN/函数返回数组中剩余的整数个数/MAINFILEFP/定义文件指针/INTI,A106,8,9,11,12,13,15,16,18,19,F,NIFFPFOPEN“MYF2OUT“,“W“NULLPRINTF“CANTOPENFILE“EXIT0NDLE_FINDGCDA,10,/调用DLE_FINDGCD函数删除数组中的所有满足条件的整数并求出剩余整数的最大公约数/FORI0IINCLUDEINCLUDEINTHEQINMATHINTM,INTN,INTA2INTI,J,M1,S1,S2,COUNT0FORM1MM1INCLUDEINCLUDEINTPRIME_MINTN,INTX,LONGYINTI,J,M,COUNTLONGK0,Q,K1,K2,K3FORM2M0INTWK310IFW1/判断2M1的十进制表示中是否包含数字1/COUNTK2K210WK3K3/10IFK220CONTINUE/判断2M1的反序数是否为奇数/IFCOUNT0XKMYKK1/符合条件的所有整数M保存到X指向的数组中,将与M对应的整数2M1保存到Y指向的数组中/RETURNK/函数返回X数组中保存的整数个数/MAINFILEFP/定义文件指针/LONGA20INTI,J,N,B20,MIFFPFOPEN“MYF2OUT“,“W“NULLPRINTF“OPENFILEMYF2OUTFAILEDN“EXIT1PRINTF“INPUTN“SCANF“D“,/接收从键盘输入的参数N/MSEARCHN,B,A/调用SEARCH函数分别求得满足上述条件的所有三位正整数和所有四位正整数/FORI0IINCLUDEINCLUDEDEFINEMINX,YXBIBMINMINMIN,AIABIBIBELSEMI
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 公司任务合同范例
- 书面保险合同范例
- 交通工程检测合同范例
- 农民投资养殖合同范例
- 公寓多人租房合同范例
- 农业公司种子合同范例
- 冰箱供货合同范例
- 产品运营合作合同范例
- 个体废铁出售合同范例
- 农村买坟地合同样本
- 三亚旅游宣传含内容
- 2024年江苏省苏州市高新区中考二模物理试题
- 2024年浙江省宁波市鄞州区部分学校九年级6月中考联考英语试卷
- 中医内科学2黄疸
- 人工智能中的因果驱动智慧树知到期末考试答案章节答案2024年湘潭大学
- (完整版)三角波发生器的安装、调试与维修
- 我的叔叔于勒课本剧
- 废品回收站租地合同
- 全国各省(直辖市、自治区)市(自治州、地区)县(县级市)区名称一览表
- 新收入准则深度解读和案例分析以及税会差异分析
- 长护险工作总结汇报
评论
0/150
提交评论