UC知道求人帮我做一下数据库的超简单作业~用VF做!谢谢(作业一)
来源：百度知道 编辑：UC知道 时间：2024/05/17 23:30:01
程序设计:
1. 编制程序,要求从键盘输入学号,再按学号查询该学生的没门课的成绩,.并输出到屏幕上,由操作员决定是否继续查询;
2. 用整数0~6依次显示星期日,星期一~星期六,编程实现以下功能: 由键盘输入一个整数,在显示器上输出对应输入整数的,用英文表示的星期几。如果输入的整数在0~6之外，则显示“输入数据错误”。
3. 编写程序，求1~100间偶数之和及偶数个数；
4. 一个三位数的个、十、百位数的立方和等于这个数本身。求这个数。
会做的请将最后做好的答案发到我的邮箱:sherlock_86927@yahoo.com.cn
并在回答问题时留下自己的邮箱号做为我给分时的依据!
PS:老师只要求最后给个打印稿,SO,只要最后答案就可以了!
1. 编制程序,要求从键盘输入学号,再按学号查询该学生的没门课的成绩,.并输出到屏幕上,由操作员决定是否继续查询;
2. 用整数0~6依次显示星期日,星期一~星期六,编程实现以下功能: 由键盘输入一个整数,在显示器上输出对应输入整数的,用英文表示的星期几。如果输入的整数在0~6之外，则显示“输入数据错误”。
3. 编写程序，求1~100间偶数之和及偶数个数；
4. 一个三位数的个、十、百位数的立方和等于这个数本身。求这个数。
会做的请将最后做好的答案发到我的邮箱:sherlock_86927@yahoo.com.cn
并在回答问题时留下自己的邮箱号做为我给分时的依据!
PS:老师只要求最后给个打印稿,SO,只要最后答案就可以了!
1.
use biao.dbf
do while .t.
input "学号" to m m值按照xh字段数据类型输入，如字符，"112"
go top
locate for m=xh
if found()
?yy, sx, yw 成绩字段
endif
enddo
如何暂停代码自己写了
2.
input "数字" to n
do case
case n=1
?"星期一"
case n=2
?"星期二"
case n=3
?"星期三"
case n=4
?"星期四"
case n=5
?"星期五"
case n=6
?"星期六"
case n=0
?"星期日"
otherwise
?"数据输入错误"
endcase
3.
public jadd,ouadd
jadd=0
ouadd=0
for i=1 to 100
if mod(i,2)=0
ouadd=ouadd+1
else
jadd=jadd+1
endif
endfor
?"偶数个数"
?ouadd
?"奇数"
?jadd
release all