程序设计补充参考代码.doc_第1页
程序设计补充参考代码.doc_第2页
程序设计补充参考代码.doc_第3页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

程序设计补充参考代码，只给出了核心代码，其余请自己补齐1、clear_if (_) and a+bc and a+cb and b+cas=(a+b+c)/2s=_?三角形的面积为：s=+_else?不能构成三角形endif2、clearn=_ &生成0-6之间的随机数do casecase _m=星期一case _m=星期二case _m=星期三case _m=星期四case _m=星期五case _m=星期六otherwisem=星期日endcase?_ &输出结果3、s=0for i=1 to 10n=0for j=1 to _n=_endfors=_endfor?1+(1+2)+(1+2+3)+.=+allt(str(_)4、clear? 公鸡, 母鸡, 小鸡for x=1 to _ &最多的公鸡数for y=1 to _z=_ &计算小鸡数if _&判断是否正好花100元?x,y,zendifendforendfor5、Clear_&初始化成绩变量i=_&初始化题数变量DO while _x=int(rand()*10)DO while .t.Y=_&生成另一个随机数IF _&判断是否在范围之内EXITENDIFENDDO?第+allt(str(i)+题：+allt(str(x)+allt(str(y)+=WAIT windows 请输入结果 to ans?ans&输入结果同行显示i=i+1IF ans=_&判断答案是否正确s=s+10ENDIF*?ENDDO?你共答对了+_+题，得分为：+allt(str(s)6、cleardime x(2,3),y(3,2)?转换前的数组为：?for i=1 to 2for j=1 to 3x(i,j)=int(rand()*20)+1y(j,i)=_&转置赋值endforendforfor i=1 to 2&输出转换前的数组for j=1 to 3?x(i,j)endfor_&一行输出完成后换行输出endfor?转换后
人人文库> 全部分类> 教育资料 > 作文作品

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论