- 在线时间
- 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个数,每个数分解出个位,十位,百位。, ~! O9 a4 M% v% W) @$ [
</P>
& [- t* M6 Q! j7 l< >#include "graphics.h"+ c6 Q3 d" U2 N k' e
main()" q6 R9 l3 F. [- @
{int x0,y0,y1,x1,driver,mode,i;! g* }$ q/ E+ C1 ]8 \: E5 X7 T
driver=VGA;mode=VGAHI;2 o. A2 t: I/ E# P- u7 a1 [, \, Z2 X
initgraph(&driver,&mode,"");, V( [. U+ Y; U& F6 a
setbkcolor(YELLOW);: B( P6 Q5 I" Q. z# N
x0=263;y0=263;y1=275;x1=275;7 D9 P4 k/ _/ p3 e! `2 f
for(i=0;i<=18;i++)
- t: q' z! [* y, p# S7 [7 c{
* ~* v6 z" K6 W( t% Psetcolor(1);
4 r" e$ |% P! X6 y1 v, H* Crectangle(x0,y0,x1,y1);
7 v9 ]1 m/ ^% Q3 t9 q" V: _6 lx0=x0-5;
$ S0 n- i) y6 e: cy0=y0-5;
$ {1 V! l! W' u: L- kx1=x1+5;/ i9 J7 j' P6 l3 t, Y9 Q& _
y1=y1+5;
6 w- T3 M4 p& n p}) i0 {6 l8 I4 T. i( ^1 t6 H
settextstyle(DEFAULT_FONT,HORIZ_DIR,2);
% E, v" {6 G6 d' l( iouttextxy(150,40,"How beautiful it is!");% L' H, R/ { D( F$ ~/ x
line(130,60,480,60);
, p( {4 m! I" I6 b# M0 ^) _setcolor(2);
: ?! S8 u# w+ i4 ?circle(269,269,137);
6 ^) D! _- T- U1 Agetch() ;</P>$ m% H1 G0 N R% ]/ c3 g
< >}</P>
* f3 ^1 c9 M: q+ G8 l< >欢迎大家多多发帖呀!</P>* C4 R2 g" P0 ]) U. G
[此贴子已经被作者于2004-6-6 19:02:29编辑过] |
zan
|