您的位置:自考365 > 复习指导 > 历年试题 > 北大“数据库原理”上机实践题目总结(5)

北大“数据库原理”上机实践题目总结(5)

2007-07-18 14:41   【 】【我要纠错

  答案:1 属性: cname, sum,cxi

  set talk off 例如: 高数 1 物理

  clear

  use tc

  index on tno + cno to tt

  action=.t.

  answer=.t.

  dimension d(3)

  do while action

  a=space(4)

  b=space(6)

  @ 1,1 say “请输入职工号:” get a picture “xxxx”

  @ 2,1 say “请输入课号:” get b picture“xxxxxx”

  read

  c=a+b

  seek c

  if found()

  scatter to d

  @ 3,2 say “tno” get d(1) picture“xxxx”

  @ 5,2 say “cno” get d(2) picture“xxxxxx”

  clear gets

  @ 7,2 say “gread” get d(3) picture“99”

  read

  @ 11,2 say “真的要修改吗?” get answer picture“l”

  read

  if answer

  clear

  gather from d

  @ 1,1 say “该职工数据已存入!”

  endif

  if .not.answer

  clear

  endif

  endif

  if .not.found()

  clear

  @ 1,1 say “查无此人!”

  endif

  @ 4,2 say “继续查吗?” get action picture“l”

  read

  clear

  enddo

  set talk on

本文转载链接:北大“数据库原理”上机实践题目总结(5)

分享到:
  • 站内搜索
  • 课程搜索
  • 试题搜索

热门搜索:教材 报名 查分 免考 考试计划