C++源码-自动批量填写调查问卷(可修改问卷内容)

24×25//自动填写调查问卷程序源码//可修改文件内容//语言：C++源码//限制编辑密码：123#includeiostream#includefstream#includevector#includestring#includectime#includesstream#includecstdlibusingnamespacestd;voiddelay(unsignedintm){intt=333;for(;m0;--m)for(;t0;--t);return;}voidchoose(ofstream&f,intr){r%=2;if(r==0)f\t●是\n\t○否\n;24×25elsef\t○是\n\t●否\n;return;}voidrandom_(vectorint&v,constintx,intcount){intres;intn=x;v.clear();srand(static_castunsigned(time(0))+count);while(n--){res=rand()%(x*2);v.push_back(res);}return;}voidrandom(vectorint&v,constintmax,intcount){v.clear();intres=0;delay(10);srand(static_castunsigned(time(0))+count);res=rand()%max;24×25if(res==0)res=max;unsignedinti;while(res--){res=rand()%max;if(v.size()==0)v.push_back(res);else{for(i=0;iv.size();++i){if(v[i]==res)break;}if(i==v.size())v.push_back(res);}}return;}intmain(){intN=208;stringstr=s:/s___________/Ｑuestion001.txt;24×25intk=0;staticintcount=0;//用于统计数据vectorvectorintrecord(11,vectorint(2,0));record[6].resize(3,0);record[7].resize(6,0);record[8].resize(10,0);record[9].resize(7,0);while(N--){ofstreamof;stringstreamos;strings;osk+1;oss;//自增文件名for(intj=s.size()-1;j=0;--j){str[27-(s.size()-j-1)]=s[j];}intres=0;of.open(str,ios::out);if(!of)24×25{cout打开/新建文件失败！endl;}vectorstringm;vectorintv;random_(v,6,count);//统计数据for(autoi=0;i6;++i){if(v[i]%2==0)++record[i][0];else++record[i][1];}of\t你关注奥运会吗？\n\n\tQ1：你平常关注体育赛事吗?\n;choose(of,v[0]);24×25of\tQ2：是否关注此次里约奥会？\n;choose(of,v[1]);of\tQ3：每天了解奥运赛况进展？\n;choose(of,v[2]);of\tQ4：每天了解中国队夺牌情况\n;choose(of,v[3]);of\tQ5：每天是否与他人谈论奥运比赛？\n;choose(of,v[4]);of\tQ6：观看比赛过程还是更注重比赛结果？\n;choose(of,v[5]);of\tQ7：主要通过什么渠道了解奥运最新赛况\n;srand(static_castunsigned(time(0))+count);res=rand()%3;if(res==0){of\t●电视\n\t○报纸\n\t○网络\n;++record[6][0];}if(res==1)24×25{of\t○电视\n\t●报纸\n\t○网络\n;++record[6][1];}if(res==2){of\t○电视\n\t○报纸\n\t●网络\n;++record[6][2];}of\tQ8：对这届里约奥会的关注情况如何？\n;m.push_back(□全世界的体育盛会，会一如既往的关注);m.push_back(□不在中国举办，不会像2008年北京奥运会那么关注);m.push_back(□里约和中国有时差，看不了直播，不太关注);m.push_back(□虽然有时差，也会熬夜看直播或第二天看录播);m.push_back(□看具体情况);m.push_back(□其他);random(v,m.size(),count);for(vectorint::iteratorpos=v.begin();pos!=v.end();++pos){24×25//□编码为-95-11，■编码为-95-10GBK编码，其他平台可更改m[*pos][1]=-10;++record[7][*pos];}for(unsignedinti=0;im.size();++i){of\tm[i]'\n';}of\tQ9：关注本届奥运会的主要原因是？\n;m.clear();m.push_back(□可以和朋友聚会看比赛，热闹又增进感情);m.push_back(□给中国队加油);m.push_back(□奥运会的比赛水平都很高);m.push_back(□可以学到很多体育知识);m.push_back(□能看到我喜欢的球队/体育明星);m.push_back(□世界级体育盛事，很热闹);m.push_back(□可以看到很多种运动项目的比赛);m.push_back(□可以了解里约的风土人情);m.push_back(□身边的人都关注，受其影响);m.push_back(□其他);24×25random(v,m.size(),count);for(vectorint::iteratorpos=v.begin();pos!=v.end();++pos){m[*pos][1]=-10;++record[8][*pos];}for(unsignedinti=0;im.size();++i){of\tm[i]'\n';}of\tQ10：本届奥运会比赛期间，你最感兴趣、最想了解的是下面哪些方面的信息？\n;m.clear();m.push_back(□游戏、竞猜、抽奖、明星见面、虚拟装扮等线上线下互动活动);m.push_back(□运动队/运动员/体育明星（八卦、赛后感言、访谈等）);m.push_back(□奥运/体育知识介绍);m.push_back(□里约各方面的介绍（交通、旅游、气候、风土人情等）);m.push_back(□赛事/赛程/赛果等相关信息);m.push_back(□比赛花絮);m.push_back(□其他);24×25random(v,m.size(),count);for(autopos=v.begin();pos!=v.end();++pos){m[*pos][1]=-10;++record[9][*pos];}for(unsignedinti=0;im.size();++i){of\tm[i]'\n';}of\tQ11：以后是否会继续关注奥运会和其他世界级赛事吗？\n;random_(v,1,count);choose(of,v[0]);if(v[0]%2==0)++record[10][0];else++record[10][1];of.close();++count;cout第++k份执行成功!endl;}//写入统计数据24×25ofstreamofs;ofs.open(S:/s___________/Total.txt,ios::out);if(!ofs){cout新建Total失败！endl;return-1;}for(autoi=0;i6;++i){ofs\tQi+1\n\t是:record[i][0]\n\t否:record[i][1]\n\n;}for(autoi=6;i=6;++i){ofs\tQ7\n\t电视:record[i][0]\n\t报纸:record[i][1]\n\t网络:record[i][2]\n\n;}ofs\n\tQ8\n;for(autoi=0;i6;++i){ofs'\t'record[7][i]\n;}24×25ofs\n\tQ9\n;for(autoi=0;i10;++i){ofs'\t'record[8][i]\n;}ofs\n\tQ10\n;for(autoi=0;i7;++i){ofs'\t'record[9][i]\n;}ofs\n\tQ11\n;for(autoi=0;i2;++i){ofs'\t'record[10][i]\n;}return0;}