批处理脚本实现C语言趣味编程百例001：余弦曲线

要求用BAT脚本实现：在屏幕上用星号（也就是*）显示0~360度的余弦函数cos(x)曲线

加分：1个技术分或者10个PB

*问题分析与算法设计
如果在程序中使用数组，这个问题十分简单。但若规定不能使用数组，问题就变得不容易了。
关键在于余弦曲线在0~360度的区间内，一行中要显示两个点，而对一般的显示器来说，只能按行输出，即：输出第一行信息后，只能向下一行输出，不能再返回到上一行。为了获得本文要求的图形就必须在一行中一次输出两个“*”。
为了同时得到余弦函数cos(x)图形在一行上的两个点，考虑利用cos(x)的左右对称性。将屏幕的行方向定义为x，列方向定义为y，则0~180度的图形与180~360度的图形是左右对称的，若定义图形的总宽度为62列，计算出x行0~180度时y点的坐标m，那么在同一行与之对称的180~360度的y点的坐标就应为62-m。程序中利用反余弦函数acos计算坐标(x,y)的对应关系。
使用这种方法编出的程序短小精炼，体现了一定的技巧。

*程序说明与注释

#include<stdio.h>
#include<math.h>
int main()
{
double y;
int x,m;
for(y=1;y>=-1;y-=0.1) /*y为列方向，值从1到-1，步长为0.1*/
{
m=acos(y)*10; /*计算出y对应的弧度m，乘以10为图形放大倍数*/
for(x=1;x<m;x++) printf(" ");
printf("*"); /*控制打印左侧的 * 号*/
for(;x<62-m;x++)printf(" ");
printf("*\n"); /*控制打印同一行中对称的右侧*号*/
}

return 0;
}
复制代码

*思考题
如何实现用“*”显示0~360度的sin(x)曲线。

在屏幕上显示0~360度的cos(x)曲线与直线f(x)=45*(y-1)+31的迭加图形。其中cos(x)图形用“*”表示，f(x)用“+”表示，在两个图形相交的点上则用f(x)图形的符号。

523066680

版主

Rank: 7 Rank: 7 Rank: 7

帖子: 3151
积分: 6455
技术: 317
捐助: 70
注册时间: 2008-8-3

2楼

发表于 2012-2-18 21:33 | 只看该作者

那个…… cos(x) 函数功能要自己实现吗……

FuniCode 编程论坛

TOP

HAT

荣誉版主

Rank: 8 Rank: 8

帖子: 380
积分: 1159
技术: 28
捐助: 0
注册时间: 2008-8-21

3楼

发表于 2012-2-18 21:41 | 只看该作者

修改一下CMD窗口的字体设置，也许出来的图形效果会有所不同。

TOP

canyuexiaolang

荣誉版主

Rank: 8 Rank: 8

帖子: 647
积分: 3454
技术: 24
捐助: 0
注册时间: 2009-4-25

4楼

发表于 2012-2-19 15:16 | 只看该作者

本帖最后由 canyuexiaolang 于 2012-2-19 15:25 编辑

@echo off & setlocal enabledelayedexpansion
set "x=1" & set "y=21" & set "z=0" & set "ax=1"
set "12=4 18 19 6 7 8 9 10 11 12 13 14 15 16" & set "24=3 5 17 20"
for /l %%i in (2 1 22) do (set /p=*<nul & call :cos "%%i")
pause>nul
exit

:cos
set /a ax=62-x & for /l %%j in (1 1 !ax!) do set /p= <nul
for %%x in (!12!) do if %~1 equ %%x set /a z+=1 & set /a x+=2
for %%x in (!24!) do if %~1 equ %%x set /a z+=2 & set /a x+=4
if %~1 equ 2 set /a z+=3 & set /a x+=6
if %~1 equ 21 set /a z+=4 & set /a x+=8
set /p=*<nul & echo.
if %~1 equ 22 goto :eof

for /l %%i in (1 1 !z!) do set /p= <nul
goto :eof
复制代码

我的代码NC到可笑。。不知道acos的作用。数坐标。。。大家别笑话~
Win7下跑不了。（主要是set/p= <nul）数出不了空格。不过把空格换成.还是可以显示的

坐标：
(1,1) (1,62)
(2,4) (2,59)
(3,6) (3,57)
(4,7) (4,56)
(5,9) (5,54)
(6,10) (6,53)
(7,11) (7,52)
(8,12) (7,51)
(9,13) (9,50)
(10,14) (10,49)
(11,15) (11,48)
(12,16) (12,47)
(13,17) (13,46)
(14,18) (14,45)
(15,19) (15,44)
(16,20) (16,43)
(17,22) (17,41)
(18,23) (18,40)
(19,24) (19,39)
(20,26) (20,37)
(21,31) (21,32)
===================
*                                                          *
*                                                    *
   *                                                 *
   *                                              *
      *                                           *
      *                                        *
      *                                     *
         *                                     *
         *                                  *
         *                               *
            *                               *
            *                            *
            *                         *
               *                         *
               *                      *
               *                   *
                  *                *
                  *             *
                     *             *
                     *       *
                           **

额。供大家参考。

Win7下的

@echo off & setlocal enabledelayedexpansion
set "x=1" & set "y=21" & set "z=0" & set "ax=1"
set "12=4 18 19 6 7 8 9 10 11 12 13 14 15 16" & set "24=3 5 17 20"
for /l %%i in (2 1 22) do (set /p=*<nul & call :cos "%%i")
pause>nul
exit

:cos
set /a ax=62-x & for /l %%j in (1 1 !ax!) do set /p=.<nul
for %%x in (!12!) do if %~1 equ %%x set /a z+=1 & set /a x+=2
for %%x in (!24!) do if %~1 equ %%x set /a z+=2 & set /a x+=4
if %~1 equ 2 set /a z+=3 & set /a x+=6
if %~1 equ 21 set /a z+=4 & set /a x+=8
set /p=*<nul & echo.
if %~1 equ 22 goto :eof
for /l %%i in (1 1 !z!) do set /p=.<nul
goto :eof
复制代码

1 评分人数

HAT: 感谢分享技术 + 1

TOP

返回列表

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

批处理脚本实现C语言趣味编程百例001：余弦曲线

[收藏此主题] [关注此主题的新回复]

[通过 QQ、MSN 分享给朋友]