- 在线时间
- 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个数,每个数分解出个位,十位,百位。
$ B3 W. T: L" m! Q2 q</P>
! T1 X- I% P- `4 m< >#include "graphics.h"& i5 j! n- O% Z* I% k
main()
) n0 d& X6 n' U# I7 P. V{int x0,y0,y1,x1,driver,mode,i;/ r4 V# z3 d+ X% ~5 L' [
driver=VGA;mode=VGAHI;
# E! \; d$ f4 G8 b1 P0 r' r3 Dinitgraph(&driver,&mode,"");* w" C( c/ ]5 z& R8 H6 |/ m( _: I
setbkcolor(YELLOW);
/ \5 n) s- x0 cx0=263;y0=263;y1=275;x1=275;# F8 v+ L6 T9 E' r" n7 X' V6 [
for(i=0;i<=18;i++)
, c2 y6 {: ?- l* g4 T0 ~{
! ? v# e- m, H O/ v! C$ B3 qsetcolor(1);
( C& B+ p( g3 j7 C9 Q+ r: trectangle(x0,y0,x1,y1);5 z2 o8 J$ n6 p0 E6 e! f7 w8 O
x0=x0-5;
. R* c4 d( W( xy0=y0-5;& G! d; o* Z' I# d: A
x1=x1+5;
/ S, M k( P4 j" G, }y1=y1+5;
' E3 u) B1 k1 b0 H }}
/ P& Z1 a& h0 E z1 j6 ^" ?: F. tsettextstyle(DEFAULT_FONT,HORIZ_DIR,2);) U& G7 e$ i3 d) e6 r
outtextxy(150,40,"How beautiful it is!");1 i$ b. c0 o+ X2 {
line(130,60,480,60);
$ _: t p+ P2 V' u1 h1 D. D' z2 b& wsetcolor(2);7 O1 g6 `: {) O# Q" R1 D
circle(269,269,137);
, ?' |8 m! ^# b3 ^2 _getch() ;</P>
, b9 n2 G# h) `0 W< >}</P>6 C+ k6 f" {5 o* t& g) |, b3 D
< >欢迎大家多多发帖呀!</P>
8 B6 s2 s- k9 B+ {7 U[此贴子已经被作者于2004-6-6 19:02:29编辑过] |
zan
|