博客
关于我
C语言娱乐项目————4、一箭双心
阅读量:159 次
发布时间:2019-02-28

本文共 2105 字,大约阅读时间需要 7 分钟。

源代码:

#include 
#include
#define I 8#define R 150int main() {int i,j,e; int a; int t1; for(i=1,a=I;i<=I/2;i++,a--){ t1=6; while(t1--)printf(" "); for(j=(int) ( I-sqrt(I*I-(a-i)*(a-i)) );j>0;j--) printf(" "); for(e=1;e<=2*sqrt(I*I-(a-i)*(a-i));e++) printf("*"); for(j=(int) ( 2*( I-sqrt(I*I-(a-i)*(a-i)) ) );j>0;j--) printf(" "); for(e=1;e<=2*sqrt(I*I-(a-i)*(a-i));e++) printf("*"); for(j=(int) ( I-sqrt(I*I-(a-i)*(a-i)) );j>0;j--) printf(" "); t1= (int) ( I-sqrt(I*I-(a-i)*(a-i)) ) ; t1= 2*t1; t1+=(int) ( 2*sqrt(I*I-(a-i)*(a-i)) ); t1=20-t1; while(t1--) printf(" "); for(j=(int) ( I-sqrt(I*I-(a-i)*(a-i)) );j>0;j--) printf(" "); for(e=1;e<=2*sqrt(I*I-(a-i)*(a-i));e++) printf("*"); for(j=(int) ( 2*( I-sqrt(I*I-(a-i)*(a-i)) ) );j>0;j--) printf(" "); for(e=1;e<=2*sqrt(I*I-(a-i)*(a-i));e++) printf("*"); for(j=(int) ( I-sqrt(I*I-(a-i)*(a-i)) );j>0;j--) printf(" "); printf("\n"); } for(i=1;i<=R/2;i++){ if(i%2||i%3)continue; t1=6; if(i==6)printf(">>----"); else while(t1--)printf(" "); for(j=(int) ( R-sqrt(R*R-i*i) );j>0;j--) printf(" "); for(e=1;e<=2*( sqrt(R*R-i*i) - (R-2*I) );e++) printf("*"); for(j=(int) ( R-sqrt(R*R-i*i) );j>0;j--) printf(" "); t1= (int)( R-sqrt(R*R-i*i) ); t1=2*t1; t1+= (int)(2*( sqrt(R*R-i*i) - (R-2*I) )); t1=35-t1; if(i==6){printf("LOVE");} else if(i==48){printf("\b\b\b爱情加油!");} else while(t1--) printf(" "); for(j=(int) ( R-sqrt(R*R-i*i) );j>0;j--) printf(" "); for(e=1;e<=2*( sqrt(R*R-i*i) - (R-2*I) );e++) printf("*"); for(j=(int) ( R-sqrt(R*R-i*i) );j>0;j--) printf(" "); if(i==6)printf("----->"); printf("\n"); } return 0; }

效果

 

转载地址:http://mhgc.baihongyu.com/

你可能感兴趣的文章
n 叉树后序遍历转换为链表问题的深入探讨
查看>>
nacos config
查看>>
NacosClient客户端搭建,微服务注册进nacos
查看>>
Nacos原理
查看>>
Nacos在双击startup.cmd启动时提示:Unable to start embedded Tomcat
查看>>
Nacos如何实现Raft算法与Raft协议原理详解
查看>>
Nacos安装教程(非常详细)从零基础入门到精通,看完这一篇就够了
查看>>
nacos注册失败,Feign调用失败,feign无法注入成我们的bean对象
查看>>
nacos源码 nacos注册中心1.4.x 源码 nacos源码如何下载 nacos 客户端源码下载地址 nacos discovery下载地址(一)
查看>>
Nacos编译报错NacosException: endpoint is blank
查看>>
NACOS部署,微服务框架之NACOS-单机、集群方式部署
查看>>
Nacos配置中心集群原理及源码分析
查看>>
nacos配置自动刷新源码解析
查看>>
Nacos集群搭建
查看>>
nacos集群搭建
查看>>
nagios安装文档
查看>>
name_save matlab
查看>>
Nami 项目使用教程
查看>>
NAT-DDNS内网穿透技术,解决动态域名解析难题
查看>>
NativePHP:使用PHP构建跨平台桌面应用的新框架
查看>>