134.沙丘图案

举报
C语言与CPP编程 发表于 2022/05/10 22:26:46 2022/05/10
【摘要】 /* Sandhill */#include <graphics.h>#include <math.h>#define PI 3.1415926void main(){ double a,b,c; int x,y,py; int gdriver=DETECT,gmode; initgraph(&gdriv...

  
  1. /* Sandhill */
  2. #include <graphics.h>
  3. #include <math.h>
  4. #define PI 3.1415926
  5. void main()
  6. {
  7. double a,b,c;
  8. int x,y,py;
  9. int gdriver=DETECT,gmode;
  10. initgraph(&gdriver,&gmode,"c:\\tc");
  11. cleardevice();
  12. setbkcolor(9);
  13. setcolor(14);
  14. outtextxy(80,3,"This program show the Sandhill picture.");
  15. for(py=20;py<=380;py+=3)
  16. {
  17. c=(py-20)*4*PI/360;
  18. b=PI*cos(c);
  19. for(a=0;a<=6*PI;a+=PI/7)
  20. {
  21. x=600/(6*PI)*a+20;
  22. y=10*sin(a+cos(a)*PI-b)*cos(c)+py;
  23. if(a==0)
  24. moveto(x,y);
  25. else
  26. lineto(x,y);
  27. }
  28. }
  29. outtextxy(80,460,"Press any key to quit...");
  30. getch();
  31. closegraph();
  32. }

文章来源: blog.csdn.net,作者:程序员编程指南,版权归原作者所有,如需转载,请联系作者。

原文链接:blog.csdn.net/weixin_41055260/article/details/124665171

【版权声明】本文为华为云社区用户转载文章,如果您发现本社区中有涉嫌抄袭的内容,欢迎发送邮件进行举报,并提供相关证据,一经查实,本社区将立刻删除涉嫌侵权内容,举报邮箱: cloudbbs@huaweicloud.com
  • 点赞
  • 收藏
  • 关注作者

评论(0

0/1000
抱歉,系统识别当前为高风险访问,暂不支持该操作

全部回复

上滑加载中

设置昵称

在此一键设置昵称,即可参与社区互动!

*长度不超过10个汉字或20个英文字符,设置后3个月内不可修改。

*长度不超过10个汉字或20个英文字符,设置后3个月内不可修改。