2\rrL3rv#&C\nL2r
)noL1NL3rv#&\n@I:#W\rn,?*if(*a<*c)\rL100T\ruq> 0$r t P0#eo7htuMr0F.\r/MODI1.C0> funpU): P0?- p?(;]0)o\r!"* P00p??*39,-47,214,-8,15,0,&./p@78?*19.250000\r+,-./0p12#345'-6p78\r9:*;<,=main> #;5?@AB@#C;5D,./p7Ei\rFG./*\r#include<stdio.h>\rdoublefun(intx[J)\r(\r/************************/\rintsum=0.0;,?`doublesum=0.0;\rintc=0,i=0;\rwhile(x[i]!=0)\r{if(x[iJ>0){\rsum+=x[i];C++;}\ri++p\r)\r/************^^und************/\rsum\=c;,?*sum/=c;\rreturnsum;\r}\rmain()\r{intx[1000];inti=0;\rprintf(H\nPleaseentersomedata(endwith0):0);EvaluationWarning:ThedocumentwascreatedwithSpire.PDFfor.NET.\rdo\r{scanf("%dn,&x[i]);)\rwhile(x[i++]!=0);\rprintf("?f\n”,fun(x));\r)\rHIJK*\rLMP*sum)t ?# ;¡?~#Wn,?doublesum=0.0;A\rfloat\rsum=0.0;o\rLOP*Vp@)