77范文网 - 专业文章范例文档资料分享平台

100个经典C语言程序(8)

来源:网络收集 时间:2020-04-16 下载这篇文档 手机版
说明:文章内容仅供预览,部分内容可能不全,需要完整文档或者需要复制内容,请下载word后使用。下载word有问题请添加微信号:或QQ: 处理(尽可能给您提供完整文档),感谢您的支持与谅解。点击这里给我发消息

【程序56】

题目:画图,学用circle画圆形。 1.程序分析: 2.程序源代码: /*circle*/

#include \ main()

{int driver,mode,i; float j=1,k=1;

driver=VGA;mode=VGAHI; initgraph(&driver,&mode,\ setbkcolor(YELLOW); for(i=0;i<=25;i++) {

setcolor(8);

circle(310,250,k); k=k+j; j=j+0.3; } }

============================================================== 【程序57】

题目:画图,学用line画直线。

1.程序分析: 2.程序源代码: #include \ main()

{int driver,mode,i; float x0,y0,y1,x1; float j=12,k;

driver=VGA;mode=VGAHI; initgraph(&driver,&mode,\ setbkcolor(GREEN);

x0=263;y0=263;y1=275;x1=275; for(i=0;i<=18;i++) {

setcolor(5);

line(x0,y0,x0,y1); x0=x0-5; y0=y0-5; x1=x1+5; y1=y1+5; j=j+10; }

x0=263;y1=275;y0=263; for(i=0;i<=20;i++) { setcolor(5); line(x0,y0,x0,y1); x0=x0+5; y0=y0+5; y1=y1-5; } } ============================================================== 【程序58】 题目:画图,学用rectangle画方形。 1.程序分析:利用for循环控制100-999个数,每个数分解出个位,十位,百位。 2.程序源代码: #include \ main() {int x0,y0,y1,x1,driver,mode,i; driver=VGA;mode=VGAHI; initgraph(&driver,&mode,\ setbkcolor(YELLOW); x0=263;y0=263;y1=275;x1=275; for(i=0;i<=18;i++) { setcolor(1); rectangle(x0,y0,x1,y1); x0=x0-5; y0=y0-5; x1=x1+5; 作者:tao2320 2006-3-15 23:36 回复此发言 11 回复:100个经典C语言程序,大家可以进来看看。 y1=y1+5; } settextstyle(DEFAULT_FONT,HORIZ_DIR,2); outtextxy(150,40,\ line(130,60,480,60); setcolor(2); circle(269,269,137); }

============================================================== 【程序59】

题目:画图,综合例子。 1.程序分析: 2.程序源代码:

# define PAI 3.1415926 # define B 0.809

# include \ #include \ main() {

int i,j,k,x0,y0,x,y,driver,mode; float a;

driver=CGA;mode=CGAC0; initgraph(&driver,&mode,\ setcolor(3);

setbkcolor(GREEN); x0=150;y0=100; circle(x0,y0,10); circle(x0,y0,20); circle(x0,y0,50); for(i=0;i<16;i++) {

a=(2*PAI/16)*i;

x=ceil(x0+48*cos(a)); y=ceil(y0+48*sin(a)*B); setcolor(2); line(x0,y0,x,y);} setcolor(3);circle(x0,y0,60);

/* Make 0 time normal size letters */

settextstyle(DEFAULT_FONT,HORIZ_DIR,0); outtextxy(10,170,\ getch();

setfillstyle(HATCH_FILL,YELLOW); floodfill(202,100,WHITE); getch();

for(k=0;k<=500;k++) {

setcolor(3);

for(i=0;i<=16;i++) {

a=(2*PAI/16)*i+(2*PAI/180)*k; x=ceil(x0+48*cos(a));

y=ceil(y0+48+sin(a)*B); setcolor(2); line(x0,y0,x,y); }

for(j=1;j<=50;j++) {

a=(2*PAI/16)*i+(2*PAI/180)*k-1; x=ceil(x0+48*cos(a)); y=ceil(y0+48*sin(a)*B); line(x0,y0,x,y); } }

restorecrtmode(); }

============================================================== 【程序60】

题目:画图,综合例子。 1.程序分析: 2.程序源代码: #include \ #define LEFT 0 #define TOP 0

#define RIGHT 639 #define BOTTOM 479 #define LINES 400

#define MAXCOLOR 15 main() {

int driver,mode,error; int x1,y1; int x2,y2;

int dx1,dy1,dx2,dy2,i=1; int count=0; int color=0; driver=VGA; mode=VGAHI;

initgraph(&driver,&mode,\ x1=x2=y1=y2=10; dx1=dy1=2; dx2=dy2=3; while(!kbhit()) {

line(x1,y1,x2,y2); x1+=dx1;y1+=dy1; x2+=dx2;y2+dy2;

if(x1<=LEFT||x1>=RIGHT) dx1=-dx1; if(y1<=TOP||y1>=BOTTOM) dy1=-dy1; if(x2<=LEFT||x2>=RIGHT) dx2=-dx2; if(y2<=TOP||y2>=BOTTOM) dy2=-dy2; if(++count>LINES) { setcolor(color); color=(color>=MAXCOLOR)?0:++color; } } closegraph(); } 作者:tao2320 2006-3-15 23:36 回复此发言 12 回复:100个经典C语言程序,大家可以进来看看。 经典c程序100例==61--70 【程序61】 题目:打印出杨辉三角形(要求打印出10行如下图) 1.程序分析: 1 1 1 1 2 1 1 3 3 1 1 4 6 4 1 1 5 10 10 5 1 2.程序源代码: main() {int i,j; int a[10][10]; printf(\ for(i=0;i<10;i++) {a[i][0]=1; a[i][i]=1;} for(i=2;i<10;i++) for(j=1;j

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读,免费范文网,提供经典小说综合文库100个经典C语言程序(8)在线全文阅读。

100个经典C语言程序(8).doc 将本文的Word文档下载到电脑,方便复制、编辑、收藏和打印 下载失败或者文档不完整,请联系客服人员解决!
本文链接:https://www.77cn.com.cn/wenku/zonghe/975166.html(转载请注明文章来源)
Copyright © 2008-2022 免费范文网 版权所有
声明 :本网站尊重并保护知识产权,根据《信息网络传播权保护条例》,如果我们转载的作品侵犯了您的权利,请在一个月内通知我们,我们会及时删除。
客服QQ: 邮箱:tiandhx2@hotmail.com
苏ICP备16052595号-18
× 注册会员免费下载(下载后可以自由复制和排版)
注册会员下载
全站内容免费自由复制
注册会员下载
全站内容免费自由复制
注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: