计算机二级C语言南开100

.NET.\rdoublefun(doublex[9])\rdoublesum=0.0;\rinti,j=l;\rfor(i=0;i<9;i++)\rif(j<=8)\r(\rsum+=sqrt((x[i]+x[i+l])/2.0);\rj++_\r)\rreturnsum;\r}\rP97@st\rdoublefun(intn)\r{\rinti,j;\rdoublesum=0.0,t;\rfor(i=l;i<=n;i++)\r(\rt=0.0;\rfor(j=l;j<=i;j++)\rt+=j_EvaluationWarning:ThedocumentwascreatedwithSpire.PDFfor.NET.\rsum+=l.0/t;\r)\rreturnsum;\r}\rP98@st\rdoublefun(intn)\r(\rinti;\rdoublesum=0.0;\rfor(i=l;i<=n;i++)\rif(i%5==0||i%9==0)\rsum+=l.0/i;\rreturnsum;\r)\rP99@st\rdoublefun(intn)\r|\rintm,k,i;\rdoubles=0.0;\rfor(m=3;m<=n;m++)\rk=sqrt(m);EvaluationWarning:ThedocumentwascreatedwithSpire.PDFfor.NET.\rfor(i=2;i<=k;i++)\rif(m%i==O)break;\rif(i>=k+l)\rs+=sqrt(m);\r)\rreturns;\r)\rP100@st\rdoublefun(intn)\r(\rinti;\rdoubles=l.0,p=l.0;\rfor(i=2;i<=n;i++)\r(\rp+=pow(i,0.5);\rs+=p;\r)\rreturns;\r)