- 在线时间
- 0 小时
- 最后登录
- 2006-3-12
- 注册时间
- 2004-5-30
- 听众数
- 1
- 收听数
- 0
- 能力
- 0 分
- 体力
- 262 点
- 威望
- 0 点
- 阅读权限
- 30
- 积分
- 109
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 27
- 主题
- 17
- 精华
- 1
- 分享
- 0
- 好友
- 0
升级   4.5% 该用户从未签到
 |
< >程序分析:利用for循环控制100-999个数,每个数分解出个位,十位,百位。
7 J( }% t- ^$ a" `# M) e</P>0 M6 e! R5 t+ j6 e
< >#include "graphics.h". m. a0 G8 P: D- b/ u; y J4 A
main()/ k4 E3 w4 |( i1 S" R' ~# t( `
{int x0,y0,y1,x1,driver,mode,i;" d5 P' n# g0 P% Z% `/ p
driver=VGA;mode=VGAHI;
8 a: C1 J8 k$ Dinitgraph(&driver,&mode,"");5 p! D- j, ^8 E1 A9 }' \- |
setbkcolor(YELLOW);' X5 U! B3 G. S* O% [
x0=263;y0=263;y1=275;x1=275;( i3 A5 L* S2 K: H$ P
for(i=0;i<=18;i++)
2 o/ W& e( ^% s/ J5 s x0 h{& X/ {1 Q# i3 X) I
setcolor(1);9 H1 y# U; t# d8 X
rectangle(x0,y0,x1,y1);0 _6 T3 d1 U- ~
x0=x0-5;% K$ v8 m. R! S8 b
y0=y0-5;
# o% I7 x& ~1 T% jx1=x1+5;
5 o9 j$ [* W- T6 ly1=y1+5;
. q! i$ w) A9 d3 L* I}
, Y$ d. N w1 ?& E) V, Rsettextstyle(DEFAULT_FONT,HORIZ_DIR,2);" K7 }2 ]; ^ Y& m
outtextxy(150,40,"How beautiful it is!");' d, W) A* j: T: @
line(130,60,480,60);
8 d$ h) X& k k7 P' C$ m1 {% fsetcolor(2);4 `( w6 ^1 u; j; @
circle(269,269,137);- F/ `6 W9 ]' r+ U
getch() ;</P>" J+ H' E! A' n& _+ N4 P+ S% k
< >}</P>! u: f' O5 Y8 v# s3 r
< >欢迎大家多多发帖呀!</P>. z' Q9 M, z' u1 ?& w. Z$ B! Y
[此贴子已经被作者于2004-6-6 19:02:29编辑过] |
zan
|