全文预览

C语言题库及答案

上传者:qnrdwb |  格式:pdf  |  页数:88 |  大小:10805KB

文档介绍
#include<stdio.h>\r#defineMAX200\rinta[MAX],b[10];EvaluationWarning:ThedocumentwascreatedwithSpire.PDFfor.NET.\rvoidjsVal()\r(\rinti,j,k;.ÆÇVW*/\rintiMax;\rfor(i=0;i<10;i++)/**O?-5ÆÇ*/\r(\riMax=0;\rfor(j=i*20;j<(i+l)*20;j++)if(iMax<a[j])iMax=a[j];\rb[i]=iMax;\rfor(j=0;j<i;j++)/*§TB-®@öli-*/\r(\rif(b[j]>iMax)/*Hb@õãdt?må*/\r{\rfor(k=i;k>j;k-)b[k]=b[k-l];/*Ú4ëK*/\rb[j]=iMax;\rbreak;\r)\r}\r)\r)\rvoidreadDat()\r{\rinti;\rFILE*fp;\rfp=fopen("in.dat"/"r");\rfor(i=0;i<MAX;i++)fscanf(fp,"%d",&a[i]);\rfclose(fp);\r)\rvoidmain()\r(\rinti;\rreadDat();\rjsVal();\rfor(i=0;i<10;i++)\rprintf("b[%d]=%d\n"/i,b[i]);\rwriteDat();\r)\rwriteDat()\r(\rFILE*fp;\rinti;EvaluationWarning:ThedocumentwascreatedwithSpire.PDFfor.NET.\rfp=fopen(nout.datH"w");\rz\rfor(i=0;i<10;i++)fprintf(fp,"%d\n",b[i]);\rfclose(fp);

收藏

分享

举报
下载此文档