| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付学习型 ASP/PHP/ASP.NET 主机 30元/年
高端软件开发 = 年薪十万不是梦赛孚耐:软件保护加密专家身份认证令牌USB KEY 
共有 233 人关注过本帖
标题:问一下,大侠帮帮忙啊~~
收藏  订阅  推荐  打印 
xwangxx
Rank: 1
等级:新手上路
帖子:3
积分:132
注册:2008-5-20
问一下,大侠帮帮忙啊~~

这是我的一段程序,但是运行之后发现圆相当粗,为什么?


if xm=='Y'
        p=0:360;
     x=input('x方向全应力---- (MPa)');
    y=input('y方向全应力---- (MPa)');
    t=input('xy平面切应力----  (MPa)');
    a=input('截面应力角----  (度)');
    m=0.5*(x+y)+0.5*(x-y)*cos(2*a)+t*sin(2*a);
    n=-0.5*(x-y)*sin(2*a)+t*cos(2*a);
    a2=atan((2*t)/(x-y));
    M=0.5*(x+y)+(((0.5*(x-y))^2+a^2)^0.5)*cos(p);
    N=(((0.5*(x-y))^2+a^2)^0.5)*sin(p);
    disp(n);
    disp(a2);
    plot(M,N,'.r');
附件: 只有本站会员才能下载或查看附件,请您 登录注册
2008-6-10 16:52
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.045749 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved