133.渔网图案

简介: 133.渔网图案
/* Fishing Net */
#include <graphics.h>
void main()
{
  int x,y,x1,y1,x0=320,y0=50;
  int i,j,n=5,r=20;
  int gdriver=VGA,gmode=VGAHI;
  initgraph(&gdriver,&gmode,"c:\\tc");
  cleardevice();
  setbkcolor(9);
  outtextxy(80,20,"This program show the Fishing Net picture.");
  for(i=0;i<=2*n;i++)
  {
    x1=x0-i*r;
    y1=y0+i*r;
    for(j=0;j<=n-1;j++)
    {
      x=x1+2*j*r;
      y=y1+2*j*r;
      arc(x,y,180,270,r);
      arc(x,y+2*r,0,90,r);
    }
  }
  x1=x0-2*r;
  y1=y0;
  for(i=0;i<=2*n;i++)
  {
    x1=x1+r;
    y1=y1+r;
    for(j=0;j<=n-1;j++)
    {
      x=x1-2*j*r;
      y=y1+2*j*r;
      arc(x,y,90,180,r);
      arc(x-2*r,y,270,360,r);
    }
  }
  outtextxy(80,460,"Press any key to quit...");
  getch();
  closegraph();
}
相关文章
|
SQL 关系型数据库 数据库连接
Python 连接 SQL 数据库 -pyodbc
以下是如何在 Python 中使用 pyodbc 连接到 SQL 数据库的基本步骤和详解
725 0
【JAVA基础篇教学】第十三篇:Java中I/O和文件操作
【JAVA基础篇教学】第十三篇:Java中I/O和文件操作
LeetCode每日一题——1704. 判断字符串的两半是否相似
给你一个偶数长度的字符串 s 。将其拆分成长度相同的两半,前一半为 a ,后一半为 b 。
257 0
|
弹性计算 运维 Kubernetes
腾讯全面上云背后:程序员的技术焦虑和技术理想
腾讯全面上云背后:程序员的技术焦虑和技术理想
484 0
|
人工智能 安全 物联网
新加坡金融科技节 | 蚂蚁金服CTO程立:面向全球开放,与合作伙伴共赢
开放的数字科技与共赢的全球合作相结合,共同塑造充满‘金融生活之美’的世界。
2593 0
使用Autofac做类的增强
我们已经实现了用户注册功能,现在想增加日志记录功能。具体来讲就是在用户注册前后,分别输出一条日志。
1437 0
|
C++
C关键字typedef及argc,argv,env参数含义
C关键字typedef--为C中各种数据类型定义别名. 在此插一点C知识 int main(int argc,const char *argv[],const char *envp[])主函数的红色部分参数含义 int argc--参数数目[argument count], int argv...
1001 0
|
2天前
|
数据采集 人工智能 安全
|
11天前
|
云安全 监控 安全