- 在线时间
- 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个数,每个数分解出个位,十位,百位。
& N5 p0 @% |8 u7 j5 M) d</P>
' b0 k, ]0 }$ B$ f8 y< >#include "graphics.h"0 t7 E8 \8 l2 R' x9 u h. H
main()
3 U, N5 H- n7 k7 n# p* C. Y{int x0,y0,y1,x1,driver,mode,i;
5 o& m4 u" s2 Z9 q9 [driver=VGA;mode=VGAHI;6 p) g! N" x0 d# W3 j( u
initgraph(&driver,&mode,"");
, x1 V& f" F. E7 asetbkcolor(YELLOW);
5 `7 U( w0 s: N. P) O1 x8 S7 {x0=263;y0=263;y1=275;x1=275;
1 K, U6 V$ l1 W9 Y% bfor(i=0;i<=18;i++)
/ @$ o7 N* G( c/ M- `. B1 ^{+ P1 M T3 P( _7 X0 F/ s' e
setcolor(1);
6 A% {% m9 e3 W( I) u( h, y$ t2 zrectangle(x0,y0,x1,y1);
% A z- g; b ^+ t: gx0=x0-5;$ b0 x+ L9 A' V( v
y0=y0-5;% P6 J C2 Z- x' P4 z9 B: C# ^
x1=x1+5;
! Q+ L; z r7 g5 b7 `$ e$ ty1=y1+5;
1 X2 L% S' _. r4 a5 N1 Q}
# D1 E4 e" _+ g: Z# Osettextstyle(DEFAULT_FONT,HORIZ_DIR,2);0 N% j( d$ T& z# `/ q M, b
outtextxy(150,40,"How beautiful it is!");4 {( L. r7 y7 z
line(130,60,480,60);
; p0 T& m0 _4 m5 t+ D; Esetcolor(2);
) l% y7 w/ Q3 @" w- z2 bcircle(269,269,137);0 f/ d- b; }$ j1 A0 l) w) \; z' |
getch() ;</P>
/ F6 d7 \9 K+ s5 F6 U" I/ Z5 z; v< >}</P>, K! |+ `6 }8 Q! z
< >欢迎大家多多发帖呀!</P>: \$ l& t7 d( D* b: i
[此贴子已经被作者于2004-6-6 19:02:29编辑过] |
zan
|