QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 3583|回复: 4
打印 上一主题 下一主题

画图,学用rectangle画方形。参考.

[复制链接]
字体大小: 正常 放大
solucky        

17

主题

1

听众

109

积分

升级  4.5%

该用户从未签到

跳转到指定楼层
1#
发表于 2004-6-6 18:57 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>程序分析:利用for循环控制100-999个数,每个数分解出个位,十位,百位。7 [- w. D; a0 d! v4 x" k9 f- v
</P>
+ x7 @9 O; y0 ]* ]1 e; m3 I0 u<>#include "graphics.h"% C& B% A/ S% l* t- e
main()
$ N( p- R) ]7 j2 l{int x0,y0,y1,x1,driver,mode,i;5 n5 N& k; ?4 C( |+ ~
driver=VGA;mode=VGAHI;
" P( ]# B; n6 }$ L; Dinitgraph(&amp;driver,&amp;mode,"");% W+ R! S) D: N0 C
setbkcolor(YELLOW);
; z/ f2 a6 g$ {/ n  }  cx0=263;y0=263;y1=275;x1=275;
+ d4 q8 J# L* j& Mfor(i=0;i&lt;=18;i++), ]& q  K  N( G) q' M1 K
{
0 Q7 N4 f& T$ csetcolor(1);0 b% y9 _& F& S
rectangle(x0,y0,x1,y1);
1 c# F# D* }( E  \x0=x0-5;
+ C' m( Q( l! C9 my0=y0-5;
( Y' Q! F  W8 J/ l) r! [# `x1=x1+5;
) d- N6 _: q) Ay1=y1+5;6 V2 y' y4 }+ p: w1 i8 x6 m
}
, A$ D. H' l, r7 y" ?$ _settextstyle(DEFAULT_FONT,HORIZ_DIR,2);
' E7 p7 S) C0 ^+ V' U0 Fouttextxy(150,40,"How beautiful it is!");  P1 t2 V* o) _" ^6 F
line(130,60,480,60);' z( I& i: L/ D
setcolor(2);8 H: C2 c- E+ \, O  n
circle(269,269,137);
- D, b9 J" A9 `. c) F. Bgetch() ;</P>5 l9 F- n7 g) e7 p1 p
<>}</P>" _* ^" }; z/ c2 A1 C# O
<>欢迎大家多多发帖呀!</P>0 R& g. _& C! p. S) G
[此贴子已经被作者于2004-6-6 19:02:29编辑过]
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
笑一笑 只牵动苦涩的嘴角 我的寂寞谁知道 我害怕 用真心面对这世界 只好越来越沉默
pride        

0

主题

1

听众

22

积分

升级  17.89%

该用户从未签到

新人进步奖

<>有关图形的,在Win-tc运行总是出现如下的错误:</P><>Graphics not initialized (use 'initgraph') </P><>请问该如何解决</P>
回复

使用道具 举报

solucky        

17

主题

1

听众

109

积分

升级  4.5%

该用户从未签到

回复

使用道具 举报

pride        

0

主题

1

听众

22

积分

升级  17.89%

该用户从未签到

新人进步奖

<>编译是成功的,问题是图象出不来,总是提示</P><>Graphics not initialized (use 'initgraph') </P>
回复

使用道具 举报

29

主题

1

听众

230

积分

该用户从未签到

元老勋章

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2026-7-21 02:48 , Processed in 0.468961 second(s), 78 queries .

回顶部