| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 826 人关注过本帖
标题:高手们救我,谁能十分钟做完,让我做什么都行
只看楼主 加入收藏
a94116479
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2008-10-13
收藏
 问题点数:0 回复次数:0 
高手们救我,谁能十分钟做完,让我做什么都行
三、运行结果题(共25题)
[程序1](5分)
SET  TALK  OFF
STORE  10  TO  X,Y
DO  WHILE  X>0
   X=X-INT(Y/2)
   Y=Y-1
ENDDO
?”X=”,X,”Y=”,Y
SET  TALK  ON
[程序2](5分)
SET  TALK  OFF
STORE  0  TO  A,B
DO  WHILE  .T.
   A=A+1
   B=B+A
   IF  A>=5
     EXIT
   ENDIF
ENDDO
?”A=”,A,”B=”,B
SET  TALK  ON
[程序3](5分)
SET  TALK  OFF
S=0
I=1
INPUT “N=?” TO N
DO  WHILE  S<=N
  S=S+I
  I=I+1
ENDDO
?”S=”,S
SET  TALK  ON
执行时如果输入值为5,写出运行结果
[程序4](5分)
SET  TALK  OFF
FOR  I=1  TO  5
   K=1
   FOR  J=1  TO  I
     @I,K  SAY”*”
     K=K+l
   ENDFOR
ENDFOR
SET  TALK  ON
 
      姓名    性别    入学成绩
990001    马华        504
990002    王军        501
990003    陈燕        523
990004    高平        512
990005    黄勇        508
990006    刘红        515
990007    杨丽        521
 [程序5](5分)
现有一表XS.DBF(见右表)
SET  TALK  OFF
USE  XS.DBF
N=0
COUNT  TO  M
SCAN
  IF 性别=”男”
    LOOP
  ENDIF
  N=N+1
ENDSCAN
N=M-N
?”N=”,N
USE
SET  TALK  ON
四、程序设计题(共15分)
1.下列表单为一简单计算器,其中有“操作数1”文件框(Name为Textl)、“操作数2”文本框(Name为Text2)、“结果”文本框(Name为Text3),运算符为一选项按钮组(Name为OptionGroup),“开始计算”为一命令按钮(Name为Commandl)。当用户在“操作数1”和“操作数2”文本框中输人数据,并在选项按钮组中选择运算符后,按下“开始计算”按钮,则在“结果”文本框中显示计算结果,试编写“开始计算”按钮的“Click”事件代码。(8分)
 
















2.编写一程序,要求将从键盘输入的英文字符串倒过来显示(例如输入"WELCOME",则显示"EMOCLEW")(7分)
搜索更多相关主题的帖子: 做什么 
2008-10-13 16:37
快速回复:高手们救我,谁能十分钟做完,让我做什么都行
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015670 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved