数学建模社区-数学中国

标题: 画图，学用rectangle画方形。参考. [打印本页]

---

作者: solucky    时间: 2004-6-6 18:57
标题: 画图，学用rectangle画方形。参考.
<>程序分析：利用for循环控制100-999个数，每个数分解出个位，十位，百位。
  b8 k( Q9 Y9 ]; g</P>
) t+ L: N, _' o<>#include "graphics.h"
main()
{int x0,y0,y1,x1,driver,mode,i;
3 K( k5 ]) j4 a+ @3 t5 Z8 H0 h! Sdriver=VGA;mode=VGAHI;
initgraph(&amp;driver,&amp;mode,"");
setbkcolor(YELLOW);
x0=263;y0=263;y1=275;x1=275;
for(i=0;i&lt;=18;i++)
{
setcolor(1);
rectangle(x0,y0,x1,y1);
x0=x0-5;
y0=y0-5;
x1=x1+5;
; P1 D" J! F8 G/ V0 Dy1=y1+5;
5 M' M6 C: a/ m/ l; d0 N, N}
8 Y/ K( V5 `5 X% P8 Ssettextstyle(DEFAULT_FONT,HORIZ_DIR,2);
" o* B$ I/ g' O  u+ ?) }outtextxy(150,40,"How beautiful it is!");
2 Z/ e$ `; @( eline(130,60,480,60);
4 t6 Q2 C* v: n. O) u1 G4 X7 Esetcolor(2);
circle(269,269,137);
# `6 N) \3 q( f1 B6 \, O3 q. ogetch() ;</P>
<>}</P>
( W: v2 I9 ?: ]! ^! P. P' Q, q+ O1 [<>欢迎大家多多发帖呀！</P>

[此贴子已经被作者于2004-6-6 19:02:29编辑过]

---

作者: pride    时间: 2004-6-7 12:29
<>有关图形的，在Win-tc运行总是出现如下的错误：</P><>Graphics not initialized (use 'initgraph') </P><>请问该如何解决</P>

---

作者: solucky    时间: 2004-6-7 18:51
<>可以呀！</P><>我也是用Win-tc下运行呀</P><>你是不是拷错了，可以运行的。</P>

---

作者: pride    时间: 2004-6-8 19:35
<>编译是成功的，问题是图象出不来，总是提示</P><>Graphics not initialized (use 'initgraph') </P>

---

作者: Matrix_windy    时间: 2004-6-8 23:05
<>我看看!!</P>

---

欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)

Powered by Discuz! X2.5