数据库编程题,编程找出100到999的水仙花数

先用中国人的语言回答吧

循环变量=100

判断循环首（循环变量<1000)

百位数=循环变量\100

十位数=（循环变量%100）\10

个位数=循环变量%10

如果真（循环变量=百位数百位数百位数+十位数十位数十位数+个位数个位数个位数）

结果编辑框。加入文本（到文本（循环变量））

循环变量=循环变量+1

判断循环尾

这是用易语言编的，就这些了，如果你用C，VB等其它都是一个原理，再搞不明白追问下，我用你学的语言再写遍。

望采纳！

&&2题

&&先在命令窗口中输入 modi comm sczfprg

SET TALK OFF

CLEA

SELE 1

USE XSCJDBF &&在工作区1中打开学生成绩表

INDEX ON 学号 TO X1 &&普通索引

COPY STRU TO XSDBF FIEL 学号,总分 &&将表结构复制并建立XSDBF

SELE 2 &&在工作区1中打开学生成绩表

USE XSDBF &&打开XSDBF

SET RELA TO 学号 INTO XSCJ &&以学号为关联字段建立临时关联

APPE FROM XSCJDBF &&从XSCJDBF 中读入记录

GO TOP &&将指针移动到首记录

REPL XS总分 WITH XSCJ数学+XSCJ英语+XSCJ语文 ALL &&修改总分的成绩

BROW

SET TALK ON

&&3题

&&先在命令窗口中输入 modi comm XGprg

SET TALK OFF

CLEA

USE 1

DO WHIL T

acce "请输入要查询的学生学号:" TO XH

LOCA FOR ALLT(XH)=学号

IF EOF()

WAIT "对不起,查无此人,是否继续Y/N" TO CX

IF UPPER(CX)="Y"

LOOP

ELSE

EXIT

ENDI

ELSE

DISP

WAIT "是否删除该生信息Y/N" TO SC

IF UPPER(CX)="Y"

DELE

WAIT "确认是否删除该生信息Y/N" TO QR

IF UPPER(QR)="Y"

PACK

ELSE

RECA

WAIT "是否继续查询Y/N" TO CX2

IF UPPER(CX2)="Y"

LOOP

ELSE

EXIT

ENDI

ENDI

ENDI

ENDI

ENDD

SET TALK ON

不好意思,这个编得有点繁杂,

create database company_info

on

primary (name=sampledata，

filename='d：\program files\microsoft sql server\mssql\data\sample。mdf'，

size=10mb，

maxsize=15mb，

filegrowth=20%)

log on

(name=samplelog。

扩展资料：

在建立数据库时通过＠设定一个字段参数的默认值。如果＠的字段参数是既有输入又有输出值的，也就是在调用了这个存储过程时，如果所指定的参数值是需要输入的参数，同时也需要在结果中输出的，则该项必须为OUTPUT。

而如果＠的字段参数只是做输出参数用，则可以用CURSOR，同时在使用该参数时，必须指定VARYING和OUTPUT这两个语句。

1)select from 读者 where 工作单位='吉林大学' and 姓名 like '王%';

2)select r姓名 from 借阅 l, 读者 r where l读者号=r读者号 and l图书号='B5';

3)select b书名 from 图书 b where b图书号 in (select l图书号 from 借阅 l where l读者号 in (select r读者号 from 读者 r where r姓名='李林'));

4)delete from 借阅 l where l 读者号 in (select r读者号 from 读者 r where r姓名='李林'));

5)create view 未还读者视图 as select r姓名, r单位 from 读者 r where r读者号 in (select l读者号 from 借阅 l where l还期 IS NULL);

查询学生人数：select count() from 学生s

5门以上学生学号：select sno from (select sno,count(cno) cnum group by 学生选课sc) where cnum>5

删除：

delete from 学生课程sc where cno=(select cno from 课程c where 课程姓名cn=‘数据结构');

delete from 课程c where 课程姓名cn='数据结构';

select xm 姓名,xb 性别,csrq 出生日期 from E;

select  xm 姓名,round((sysdate-csrq)/365,0) 年龄 from e where xb='male';

select from d where lx='技术服务中心';

select a,bbmmc from (select dno,avg(money) jiangjin from r group by dno) a left join (select bmmc,dno from d group by bmmc,dno) b on adno=bdno order by ajiangjin desc

update r set money=money-100 where money>=600

update r set money=(1+05)money where dno in (select dno from d where bmmc='项目三部')

delete from d where dno not in (select dno from r)

select aeno,axm,bbmmc,cmoney from e a,d b,r c where aeno=ceno and adno=cdno

select a,bbmmc from (select dno from r where eno not in (select eno from e where xm='张三三')) a left join d b on adno=bdno

最后一个自己写吧 哈哈

以上就是关于数据库编程题,编程找出100到999的水仙花数全部的内容，包括:数据库编程题,编程找出100到999的水仙花数、求教：VFP数据库的一个简单编程问题（急）、编程题目：从数据库“BOOK”的表“BOOKINFO”中，查询“定价”在50到100之间的图书信息，要求等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！