哈工大材料力学计算机计算大作业_范例

合集下载

材料力学上机大作业(哈工大)

材料力学上机大作业(哈工大)

H a r b i n I n s t i t u t e o f T e c h n o l o g y材料力学上机报告课程名称:材料力学设计题目:二向应力状态分析院系:XXXXXX班级:XXXXXX设计者:XXXXXX学号:XXXXXX设计时间:2013.06.18哈尔滨工业大学二向应力状态分析一:课题要求1.输入:任意一点的应力状态:(σx、σy、τxy);某截面方位角α2.输出:输入点的主应力(σ1、σ2、σ3),方位角α斜截面上的应力σα、τα。

及主方向角α3.画出应力圆示意图。

4.程序运行时为界面显示形式。

二:程序框图三:所编程序x=str2double(get(handles.edit1,'string'));y=str2double(get(handles.edit2,'string'));xy=str2double(get(handles.edit3,'string'));M=str2double(get(handles.edit4,'string')); %将窗口输入值分别赋给x,y,xy,M b=sqrt((x/2-y/2)^2+xy^2);x1=(x+y)/2+b;x3=(x+y)/2-b;x2=0;if x1<0x2=x1;x1=0;endt=(x1-x3)/2;M=M*pi/180;b1=(x+y)/2+(x-y)*cos(2*M)/2-xy*sin(2*M);b2=(x-y)*sin(2*M)/2+xy*cos(2*M);b3=90*atan((-2*xy)/(x+y))/pi;%计算输出的主切应力大小、方向和截面上的应力并赋值set(handles.edit5,'string',x1);set(handles.edit6,'string',x2);set(handles.edit7,'string',x3);set(handles.edit9,'string',t);set(handles.edit10,'string',b3);set(handles.edit11,'string',b1);set(handles.edit12,'string',b2);%在输出窗口显示主切应力大小、方向和截面上应力b4=sqrt(b.^2+t.^2);v1=(x+y)/2-b4:0.001:(x+y)/2+b4;b11=sqrt(b4.^2-(v1-(x+y)/2).^2);b12=-sqrt(b4.^2-(v1-(x+y)/2).^2);%绘制应力圆上的点axes(handles.axes1); %选择应力圆的输出地址plot(v1,b11,v1,b12);grid on%绘制应力圆以上程序为在matlab中使用GUI编程时的主代码,界面代码请见m文件。

哈工大 材料力学 MATLAB 梁 上机 大作业

哈工大 材料力学 MATLAB 梁 上机 大作业

本程序只支持静定结构的梁(左端悬臂梁、简支梁)函数输入格式:beamsolver(L,EI,supports,loads,maxdx);参量的输入格式:L=10.0EI=2e8supports={{'f',0},{'v',10.0}} ----左端悬臂梁supports={{'p',2.0},{'r',8.0}} ----简支梁loads={{'f',[2.0,1000]},{'m',[4.0,500]},{'d',[7.0,9.0,3.0,20,100]}}maxdx=0.01输出为V,M,vy,x的一维行向量和三张坐标图----图1:剪力V图,图2:弯矩M图,图3:挠度vy图.范例:悬臂梁:纯受集中力:beamsolver(10.0,2e8,{{'f',0},{'v',10.0}},{{'f',[2.0,1000]}},0.01)纯受集中矩:beamsolver(10.0,2e8,{{'f',0},{'v',10.0}},{{'m',[4.0,500]}},0.01)纯受分布力(格式一):beamsolver(10.0,2e8,{{'f',0},{'v',10.0}},{{'d',[7.0,9.0,3.0,20,100]}},0.01) 纯受分布力(格式二):beamsolver(10.0,2e8,{{'f',0},{'v',10.0}},{{'d',[(7.0:0.01:9.0);(0:0.01:2.0).^2]} },0.01)受混合力:beamsolver(10.0,2e8,{{'f',0},{'v',10.0}},{{'f',[2.0,1000]},{'m',[4.0,500]},{'d', [7.0,9.0,3.0,20,100]}},0.01)简支梁:纯受集中力:beamsolver(10.0,2e8,{{'p',2.0},{'r',8.0}},{{'f',[5.0,1000]}},0.01)纯受集中矩:beamsolver(10.0,2e8,{{'p',2.0},{'r',8.0}},{{'m',[4.0,500]}},0.01)纯受分布力(格式一):beamsolver(10.0,2e8,{{'p',2.0},{'r',8.0}},{{'d',[7.0,9.0,3.0,20,100]}},0.01) 纯受分布力(格式二):beamsolver(10.0,2e8,{{'p',2.0},{'r',8.0}},{{'d',[(7.0:0.01:9.0);(0:0.01:2.0).^2] }},0.01)受混合力:beamsolver(10.0,2e8,{{'p',2.0},{'r',8.0}},{{'f',[5.0,1000]},{'m',[4.0,500]},{'d' ,[7.0,9.0,3.0,20,100]}},0.01)以上范例输出的剪力V图、弯矩M图都经过笔算检验完全正确。

哈工大材料力学大作业--matlab编程

哈工大材料力学大作业--matlab编程

H a r b i n I n s t i t u t e o f T e c h n o l o g y材料力学上机作业课程名称:材料力学设计题目:应力状态分析院系:机电学院班级:分析者:学号:指导教师:***设计时间:2013年6月18日哈尔滨工业大学材料力学上机课设计说明书一, 设计题目题目7 应力状态分析 输入:1. 平面应力状态输入:x y xy σστ(,,);某截面方位角α2. 空间应力状态输入:,x y z xy yz zx σσστττ(,,,,)输出: 1. 输出主应力123σσσ(,,)2. 最大切应力(13max 132σσττ-==)3.如为平面应力状态则需要输出方位角α斜截面上的应力ααστ、及主方向角*σα4. 画出应力圆示意图二, 程序计算设计过程1. 平面应力状态分析对于任意平面应力状态,有max min σσ=2x y σσ+±主应力为:1max 23min ,0,σσσσσ===并且由 2tan 2xyx yστασσ=-可求得主应力方向角13σσαα、。

对于任意一个方位角α,有:=cos 2sin 222sin 2cos 22x yx yxy x yxy αασσσσσατασστατα++++-=-+从而,输入任意角α,即可求得该截面的应力状态ααστ、并且ααστ、都是关于α的函数,上式即为应力圆的参数方程,参数为α。

将α从0到pi 取一系列的值,则可以求出一系列的ααστ、,在坐标系中找到对应点,连接即可作出应力圆。

2. 三向应力状态分析解特征方程 321230I I I σσσ-+-=即可求出主应力123σσσ、、 其中:123||||||||x y z xyx y zy z xz xy y yz z zx x x yx zx xyy zy xzyz z I I I σσσστστσττστστσστττστττσ=-+⎛⎫⎛⎫⎛⎫=++⎪ ⎪ ⎪⎝⎭⎝⎭⎝⎭⎛⎫⎪= ⎪ ⎪⎝⎭再由 13max 132σσττ-== 可求得最大切应力。

材料力学上机大作业(matlab编)

材料力学上机大作业(matlab编)

一、可实现课题在如图所示的悬臂梁中,杆件为圆杆。

杆长为L,直径为D,材料弹性模量为E。

输入集中力F大小,作用点a,弯矩M,作用点b,即可求得悬臂梁的挠度曲线图。

二、程序代码clear alldisp('请给定材料信息'); %输入材料信息L=input('圆杆长度L(/M)=');D=input('圆杆直径D(/M)=');E=input('弹性模量E(/GPa)=');I=double(D^4*3.14/32);disp('请给定受力情况'); %输入受力情况F=input('切向集中力大小F(/N)=');a=input('切向集中力作用位置(/M)=');M=input('弯矩大小M(/N*M)=');b=input('弯矩作用位置(/M)=');x1=0:0.01:a; %F引入的挠度vx1=(-F*x1.^2*3*a+F*x1.^3)*(1/(6*E*10^9*I));x2=a:0.01:L;vx2=(-F*a.^2*3*x2+F*a.^3)*(1/(6*E*10^9*I));v11=[vx1,vx2];x11=[x1,x2];x3=0:0.01:b; %M引入的挠度vx3=(-M*x3.^2)*(1/(2*E*10^9*I));x4=b:0.01:L;vx4=(-M*b*x4+M*0.5*b.^2)*(1/(E*10^9*I));x22=[x3,x4];v22=[vx3,vx4];v33=v22+v11; %叠加plot(x11,v33),xlabel('x /M'),ylabel('v(x) /M')title('挠曲线图')grid on;三、使用方法运行代码输入圆杆长度(单位:m)输入圆杆直径(单位:m)输入弹性模量(单位:GPa)输入集中力大小(单位:N)(向下为正,若无请输入0)输入集中力作用位置(单位:m)(若无请输入0)输入弯矩大小(单位:N*m)(逆时针为正,若无请输入0)输入弯矩作用位置(单位:m)(若无请输入0)输出挠曲线图四、运行实例【实例1】圆杆同时受集中力与弯矩作用,输入、输出见下图。

哈工大材力上机大作业解析

哈工大材力上机大作业解析

材料力学上机报告课程名称:材料力学设计题目:简支梁在任意载荷下剪力图弯矩图挠度曲线的绘制院系:材料学院班级:设计者:学号:编程语言:Visual Basic设计时间:2016.06一、课题要求求三种截面的简支梁(矩形截面,实心圆截面和空心圆截面)在受到任意多的力F,力偶M和分布力q的作用下,其上任意一点的剪力弯矩和挠度的大小,并绘制梁的剪力图、弯矩图和挠曲线。

输入1.梁的总长度l和材料的弹性模量E。

2.选择界面形状(矩形截面,实心圆,空心圆)。

如果是矩形截面,输入矩形的宽度b和高度h。

如果是实心圆截面,输入圆的直径D。

如果是空心圆截面,输入空心圆的外径D和内径d。

3. 输入载荷情况。

若载荷是力,输入力的大小F和作用点a。

如果载荷是均布载荷,输入均布载荷的大小q和载荷的起始位置c和终止位置f。

如果载荷是力偶。

输入力偶的大小m和作用点e。

输出:1. 结构构形图2. 任意一点的剪力,弯矩,挠度3. 画出剪力图,弯矩图和挠曲线二.数学模型及算法总体思想为叠加法。

不妨假设简支梁的长度为l。

1.只有一个作用点位置为a的力F的作用下a)剪力的大小当0<x<a时,f1=(l-a)/l*f当a<x<l时,f1=(-1)*a/l*fb)弯矩的大小当0<x<a时:m1= (l-a)/l*F*x当a<x<l时:m1= a/l*F*(l-x)c)挠度的大小v1=(-1)*(F*(l-a)/(6*E*I*l))*(l/(l-a)*(x-a)^3)+((l*l-(l-a)*( l-a))*x- x^3)2.只有一个作用点位置为b和c的均布力作用下a)剪力的大小当0<x<b时:f2= q*(c-b)*(3*c-b)/(2*l)当b<x<c时:f2= q*(c-b)*(3*c-b)/(2*l)-q*(x-b)当c<x<l时:f2= (-1)*q*(c*c-b*b)/(2*l)b)弯矩的大小当0<x<b时:m2=q*(c-b)*(3*c-b)/(2*l)当b<x<c时:m2= q*(c-b)*(3*c-b)/(2*l)-(q*(x-b)*(x-b))/2当c<x<l时:m2= (-1)*(q*(c*c-b*b)/(2*l))*(c-x)c)挠度的大小当0<x<b时:v2= q*(c-b)*(3*c-b)/(12 *E*I*l)* (x^3)当b<x<c时:v2=q*(c-b)*(3*c-b)/(2*l)* (x^3)/6-((q*(x-b)*(x-b))/4) * (x^2)当c<x<l时:v2= (-1)*(q*(c*c-b*b)/(4 *E*I*l))*(c-x)* (x^2)3.只有一个作用点位置为d的力偶的作用下a)剪力的大小f3=m/lb)弯矩的大小当0<x<d时:m3= m/l*x当d<x<l时:m3= (-1)*m/l*(l-x)c)挠度的大小v3= (-1)*m/(6*E*I*l)*((-1)* (x^3)+3*l* ((x-d)^2)+x*(l*l-3* ((l-d)^2)))其中惯性矩I分为三种情况,即实心圆,空心圆和矩形截面:实心圆:I= pi*(d^4)/64空心圆:I= pi*(D^4) *(1- ((d/D)^4)/64矩形截面:I= b* (h^3)/12三.程序流程图三.程序变量说明及程序清单E:弹性模量n:力的个数F:集中力大小c:分布力右端距左端支座的距离k:空心圆筒内径o:空心圆筒外径L:杆件长度G:切变模量b:矩形截面的宽度h:矩形截面的高Y:挠度jiao:转角I:截面惯性矩L:梁长E:弹性模量Z:惯性矩a:集中力距支座左端的距离d:实心圆径q:分布力大小M:力偶大小程序源代码Form 1(封皮)Private Sub Command1_Click() '点击简支梁,出现form2Form1.HideForm10.ShowPrivate Sub Command2_Click() '点击结束,结束整个程序EndEnd SubPrivate Sub Form_Load()Label1.FontBold = TrueEnd SubForm10开始进入选择阶段(剪力弯矩或者挠度)Private Sub Command1_Click() '梁剪力弯矩图Form3.ShowForm2.HideEnd SubPrivate Sub Command2_Click() '梁挠度Form2.ShowForm3.HideEnd SubPrivate Sub Form_Load()End SubPrivate Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)Private Sub Option1_Click() '矩形数据的输入Text8.Enabled = FalseText6.Enabled = TrueText7.Enabled = TrueText11.Enabled = FalseText12.Enabled = FalsePicture4.Visible = TruePicture5.Visible = FalsePicture6.Visible = FalseEnd SubPrivate Sub Option2_Click() '圆截面数据的输入Text8.Enabled = TrueText6.Enabled = FalseText7.Enabled = FalseText11.Enabled = FalseText12.Enabled = FalsePicture4.Visible = FalsePicture5.Visible = TruePicture6.Visible = FalseEnd SubPrivate Sub Option3_Click() '空心圆截面数据的输入Text8.Enabled = FalseText6.Enabled = FalseText7.Enabled = FalseText11.Enabled = TrueText12.Enabled = TruePicture4.Visible = FalsePicture5.Visible = FalsePicture6.Visible = TrueEnd SubPrivate Sub Text1_Change() 'F的单位换算F = Val(Text1.Text) * 1000End SubPrivate Sub Text11_Change() '对o赋值,并换算o = Val(Text11.Text) / 100End SubPrivate Sub Text12_Change() '对d赋值,换算,并计算空心圆截面的Iz的值k = Val(Text12.Text) / 100F = (k / o) ^ 4Iz = 3.1415926 * o ^ 4 / 64 * (1 - F)End SubPrivate Sub Text2_Change() 'a的单位换算a = Val(Text2.Text) / 100End SubPrivate Sub Text3_Change() 'M的单位换算M = Val(Text3.Text) * 1000End SubPrivate Sub Text5_Change() 'q的单位换算q = Val(Text5.Text) * 1000End SubPrivate Sub Text6_Change() '对b赋值b = Val(Text6.Text)End SubPrivate Sub Text7_Change() '对h赋值,并计算矩形截面的Iz的值h = Val(Text7.Text)Iz = 10 ^ -8 * h * b ^ 3 / 12End SubForm 2 (输入杆长,载荷和截面大小尺寸,并且选择所要求的挠度,挠曲线等)Private Sub Check1_Click() '显示待输入数据栏及力样图片Text1.Enabled = TrueText2.Enabled = TruePicture3.Visible = TruePicture1.Visible = FalsePicture2.Visible = FalseEnd SubPrivate Sub Check2_Click() '显示待输入数据栏及力样图片Text3.Enabled = TruePicture1.Visible = FalsePicture2.Visible = TruePicture3.Visible = FalseEnd SubPrivate Sub Check3_Click() '显示待输入数据栏及力样图片Text5.Enabled = TruePicture1.Visible = TruePicture2.Visible = FalsePicture3.Visible = FalseEnd SubPrivate Sub Command1_Click() '返回主菜单,并清空数据Text1.Enabled = False: Text2.Enabled = False: Text3.Enabled = False: Text5.Enabled = False: Text8.Enabled = False:Text12.Enabled = False: Text11.Enabled = False: Text6.Enabled = False: Text7.Enabled = FalseCheck1 = False: Check2 = False: Check3 = False: Option1 = False: Option2 = FalsePicture1.Visible = False: Picture2.Visible = False: Picture3.Visible = False: Picture4.Visible = False: Picture5.Visible = FalseIz = 0: E = 0: Ym = 0: jiaom = 0: L = 0: F = 0: M = 0: q = 0: a = 0: b = 0: h = 0: d = 0: X = 0Text1.Text = "": Text2.Text = "": Text3.Text = "": Text8.Text = "": Text5.Text = "": Text6.Text = "": Text7.Text = "": Text9.Text = "": Text10.Text = ""Form2.HideForm10.ShowForm3.HideEnd SubPrivate Sub Command2_Click() '最大挠度与转角的输入检测If L = 0 Or E = 0 Or Iz = 0 Thenn = MsgBox("您还有数据未输入。

材力上机

材力上机

Harbin Institute of Technology材料力学上机作业班号:1308109学号:1130810904姓名:李乾指导教师:牟宗花完成时间:2015/6/17一、题目:n个力,h个力偶,m段分布力共同作用下的最大弯矩,最大挠度。

二、程序:(包括运行结果截图)#include<stdio.h>double fFs0(double l,double a,double F,double E,double I,double x){double b,fs;b=l-a;if(x>=0&&x<=a){fs=-a*F/l;}else if(x>a&&x<=l){fs=b*F/l;}return fs;}double fM0(double l,double a,double F,double E,double I,double x){double b,M;b=l-a;if(x>=0&&x<=a){M=-a*F*x/l;}else if(x>a&&x<=l){M=(l-x)*b*F/l;}return M;}double fv0(double l,double a,double F,double E,double I,double x){double b,v;b=l-a;if(x>=0&&x<=a){v=-F*b*x*(l*l-x*x-b*b)/(6*E*I*l);}else if(x>a&&x<=l){v=-F*b*(l*(x-a)*(x-a)*(x-a)/b+(l*l-b*b)*x-x*x*x)/(6*E*I*l);}return v;}double fFs1(double l,double a,double Me,double E,double I,double x) {double b,Fs;b=l-a;if(x>=0&&x<=a){Fs=Me/l;}else if(x>a&&x<=l){Fs=-Me/l;}return Fs;}double fM1(double l,double a,double Me,double E,double I,double x) {double b,M;b=l-a;if(x>=0&&x<=a){M=-Me*x/l;}else if(x>a&&x<=l){M=Me*x/l;}return M;}double fv1(double l,double a,double Me,double E,double I,double x) {double b,v;b=l-a;if(x>=0&&x<=a){v=Me*x/(6*E*I*l)*(l*l-3*b*b-x*x);}else if(x>a&&x<=l){v=Me/(6*E*I*l)*(-x*x*x+3*l*(x-a)*(x-a)+(l*l-3*b*b)*x);}return v;}double fFs2(double l,double a,double b,double q,double E,double I,double x){double c,FA,FB,c1,d1,Fs;c=l-a-b;FA=q*c*(b+c/2)/l;FB=q*c*(a+c/2)/l;c1=(8*q*c*(b+0.5*c)*(l*l-0.5*(b+0.5*c)*(b+0.5*c))+3*q*c*c*c*c+5*q*a*c*c*c+5*q*c*c* c)/(48*l);d1=1*q*c*c*c*c/16+5*q*a*c*c*c/48;if (x>=0&&x<=a){Fs=-FB;}else if(x>a&&x<=a+c){Fs=(x-a)*q-FA;}else if(x>a+c&&x<=l){Fs=FB;}return Fs;}double fM2(double l,double a,double b,double q,double E,double I,double x){double c,FA,FB,c1,d1,M;c=l-a-b;FA=q*c*(b+c/2)/l;FB=q*c*(a+c/2)/l;c1=(8*q*c*(b+0.5*c)*(l*l-0.5*(b+0.5*c)*(b+0.5*c))+3*q*c*c*c*c+5*q*a*c*c*c+5*q*c*c* c)/(48*l);d1=1*q*c*c*c*c/16+5*q*a*c*c*c/48;if (x>=0&&x<=a){M=FA*x;}else if(x>a&&x<=a+c){M=FA*x-(x-a)*(x-a)/2*q;}else if(x>a+c&&x<=l){M=FB*(l-x);}return M;}double fv2(double l,double a,double b,double q,double E,double I,double x){double c,FA,FB,c1,d1,v;c=l-a-b;FA=q*c*(b+c/2)/l;FB=q*c*(a+c/2)/l;c1=(8*q*c*(b+0.5*c)*(l*l-0.5*(b+0.5*c)*(b+0.5*c))+3*q*c*c*c*c+5*q*a*c*c*c+5*q*c*c* c)/(48*l*E*I);d1=q*c*c*c*c/(16*E*I)+5*q*a*c*c*c/(48*E*I);if (x>=0&&x<=a){v=q*c*(b+c/2)/(6*l*E*I)*x*x*x+c1*x;}else if(x>a&&x<=a+c){v=q*c*(b+1*c/2)/(6*l*E*I)*x*x*x-q*(x-a)*(x-a)*(x-a)*(x-a)/(24*E*I)+c1*x;}else if(x>a+c&&x<=l){v=q*c*(b+0.5*c)/(6*l*E*I)*x*x*x-(q*c*(x-a-0.5*c)*(x-a-0.5*c)*(x-a-0.5*c))/(12*E*I)+(c1-5/(48*E*I)*q*c*c*c)*x+d1;}return v;}main(){int n,h,m,i;double M=0,Fs=0,v=0,E=0,I=0,l=0,x=0,Fsm=0,Mm=0,vm=0,x1=0,x2=0,x3=0;printf("输入l/m,E/GPa,I/cm^4:\n");scanf("%lf,%lf,%lf",&l,&E,&I);E=E*1000000000;I=I*0.00000001;printf("输入力的个数n=");scanf("%d",&n);printf("输入力偶的个数h=");scanf("%d",&h);printf("输入分布力的个数m=");scanf("%d",&m);double ai[50],Fi[50],ak[50],mk[50],aj[50],bj[50],qj[50];printf("输入ai/m的%d个值\n",n);for(i=0;i<n;i++){scanf("%lf",&ai[i]);}printf("输入Fi/kN的%d个值\n",n);for(i=0;i<n;i++){scanf("%lf",&Fi[i]);Fi[i]=1000*Fi[i];}printf("输入ak/m的%d个值\n",h);for(i=0;i<h;i++){scanf("%lf",&ak[i]);}printf("输入mk/kmN的%d个值\n",h); for(i=0;i<h;i++){scanf("%lf",&mk[i]);mk[i]=1000*mk[i];}printf("输入aj的%d个值\n",m);for(i=0;i<m;i++){scanf("%lf",&aj[i]);}printf("输入bj的%d个值\n",m);for(i=0;i<m;i++){scanf("%lf",&bj[i]);}printf("输入qj/kN/m的%d个值\n",m); for(i=0;i<m;i++){scanf("%lf",&qj[i]);qj[i]=1000*qj[i];}for(x=0;x<=l;x+=l/500){Fs=0;M=0;v=0;for(i=0;i<n;i++){Fs=Fs+fFs0(l,ai[i],Fi[i],E,I,x);M=M+fM0(l,ai[i],Fi[i],E,I,x);v=v+fv0(l,ai[i],Fi[i],E,I,x);}for(i=0;i<h;i++){Fs=Fs+fFs1(l,ak[i],mk[i],E,I,x);M=M+fM1(l,ak[i],mk[i],E,I,x);v=v+fv1(l,ak[i],mk[i],E,I,x);}for(i=0;i<m;i++){Fs=Fs+fFs2(l,aj[i],bj[i],qj[i],E,I,x);M=M+fM2(l,aj[i],bj[i],qj[i],E,I,x);v=v+fv2(l,aj[i],bj[i],qj[i],E,I,x);}if(Fs*Fs>Fsm*Fsm)Fsm=Fs;if(M*M>Mm*Mm)Mm=M;if(v*v > vm*vm)vm=v;}Fsm=Fsm/1000;Mm=Mm/1000;图 1 运行结果vm=vm*1000;printf("最大剪力为%lf/kN\n最大弯矩为%lf/kNm\n最大挠度为%lf/mm\n",Fsm,Mm,vm); }运行结果如上图所示三、收获、感想:通过本次上机实验,我认识到了利用计算机编程求解问题的方法,掌握了基本的利用计算机解决力学问题的办法。

哈工大材料力学计算机计算大作业_范例

哈工大材料力学计算机计算大作业_范例

B
ql 3 48 EI z
500 23 1.5215mrad 3 0.034 0.054 3 9 0.04 0.06 48 200 10 12 12 500 2 4 1.1411mm 3 0.034 0.0543 9 0.04 0.06 128 200 10 12 12
max
1000 32 1 5.77 mm , x 3 1732.1mm 9 3 100000 3
电算解:
故:与理论解一致。
第 十四 页 共 二十一 页
材料力学大作业
(8)理论解:
增补条件: 代入约定条件算得: A M 3000 N m , a 1 .6 m , 电算解:
3
电算解:
故:与理论解一致。
第 十七 页 共 二十一 页
材料力学大作业
(11)理论解:
代入约定数据解之得: A B 11 .25mrad ; C
5 1000 34 10.55mm 384 100000
电算解:
故:与理论解一致。
第 十八 页 共 二十一 页
然后,我们需要输入抗弯刚度。题目没有给怎么办?不怕,我们有“抗弯刚度计算器”!点击对 应区段抗弯刚度边上的按钮即可开始计算!
第 三 页 共 二十一 页
材料力学大作业
在计算完毕之后,点击“置入并返回” ,则我们又来到了基本信息输入界面。由于这一根简单 梁是等截面、等抗弯刚度的,所以我们不用去管“区段二”和“区段三”的相关文本框(实际上在 你选定对应的区段之前,这些文本框都是无法激活的) 。我们需要点击“更新基本信息”按键,以 核查、写入数据。核查无误,我们点击“受力情况输入”按钮。

2016新编哈工大材料力学上机大作业四——绘制梁的剪力弯矩图

2016新编哈工大材料力学上机大作业四——绘制梁的剪力弯矩图

H a r b i n I n s t i t u t e o f T e c h n o l o g y材料力学上机作业课程名称:材料力学设计题目:绘制梁的剪力弯矩图院系:班级:分析者:学号:指导教师:设计时间:哈尔滨工业大学材料力学上机课设计说明书一,设计题目题目4 绘制梁的剪力弯矩图输入:1.梁的总长度l2.支撑条件及量的各区段长度输入(左、右固定端悬臂梁;简支梁;左、右、双外伸梁)3.各载荷大小、作用位置及方向(q i、a i、b i;p j、c j、m k、d k)输出:1.结构构型图(图示)2.剪力、弯矩(图示)3.输出剪力、弯矩的最大值及截面位置。

二,方向规定本程序规定集中作用力及均布载荷以向下为正,右固定端悬臂梁与左外伸梁集中力偶以顺时针方向为正,其他情况集中力偶以逆时针方向为正。

当取出梁的一段为研究对象时,梁左端面力以向下为正,力偶以顺时针方向为正,梁右端面力以向上为正,力偶以逆时针方向为正。

三,程序设计过程1,制作程序框架,显示提示内容,提示操作者需要输入的作用条件及各作用位置;2,编写程序使计算机读入操作者输入的作用条件;3,草稿拟写各种情况下为达到题目要求所需使用的计算公式设量的长度为l,集中力大小为p,作用位置为c,集中力大小为q,作用起始位置a,终止位置为b,集中力偶大小为m,作用位置d。

(1)左固定端悬臂梁:在任意位置x处,取x以右部分为研究对象a,终止位置为b,集中力作用位置为c,大小为P,集中力偶作用位置为d,大小为m。

①若c<x,a<b<x,d>x,则Fs y=0,M(x)=m;②若c>x,a<b<x,d<x,则Fs y=-P,M(x)=Px-Pc;③若c<x,a<x<b,d<x,则Fs y=-q(b-x),M(x)=-2q(b-x)²;④若c<x, x<a<b,d>x,则Fs y=-q(b-a),M(x)=-q(b-a)(2ba+-x);⑤若c>x,a<b<x,d>x,则Fs y=-P,M(x)= Px-Pc+m;(第①、②两种情况合成)⑥若c<x,a<x<b,d>x,则Fs y=-q(b-x),M(x)=m-2q(b-x)²;(第①、③两种情况合成)⑦若c<x,x<a<b,d>x,则Fs y=-q(b-a),M(x)=m-q(b-a)(2ba+-x);(第①、④两种情况合成)⑧若c>x,a<x<b,d<x,则Fs y=-P-q(b-x),M(x)=Px-Pc-2q(b-x)²;(第②、③两种情况合成)⑨若c>x,x<a<b,d<x,则Fs y=-P-q(b-a),M(x)=Px-Pc-q(b-a)*(2ba+-x);(第②、④两种情况合成)⑩若c>x,x<a<b,d>x,则Fs y=-P-q(b-a), M(x)=m+Px-Pc-q(b-a)*(2ba+-x);(第①、②、④两种情况合成)⑪c>x,a<x<b,d>x, 则Fs y=-P-q(b-x), M(x)m+Px-Pc-q(b-a)*(2ba+-x); (第①、②、③两种情况合成)将上述公式编入程序即可计算出在固定端悬臂梁情况下任意位置处的剪力和弯矩,采用散点法作出梁的剪力弯矩图。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

然后,我们需要输入抗弯刚度。题目没有给怎么办?不怕,我们有“抗弯刚度计算器”!点击对 应区段抗弯刚度边上的按钮即可开始计算!
第 三 页 共 二十一 页
材料力学大作业
在计算完毕之后,点击“置入并返回” ,则我们又来到了基本信息输入界面。由于这一根简单 梁是等截面、等抗弯刚度的,所以我们不用去管“区段二”和“区段三”的相关文本框(实际上在 你选定对应的区段之前,这些文本框都是无法激活的) 。我们需要点击“更新基本信息”按键,以 核查、写入数据。核查无误,我们点击“受力情况输入”按钮。
max
1000 32 1 5.77 mm , x 3 1732.1mm 9 3 100000 3
电算解:
故:与理论解一致。
第 十四 页 共 二十一 页
材料力学大作业
(8)理论解:
增补条件: 代入约定条件算得: A M 3000 N m , a 1 .6 m , 电算解:
第 七 页 共 二十一 页
材料力学大作业
(1)理论解:
代入约定数据计算得: B 30mrad , B 45mm 电算解:
故:与理论解一致。
第 八 页 共 二十一 页
材料力学大作业
(2)理论解:
增补条件: a 2m ,代入约定数据计算得: B 20mrad , B 40mm 电算解:
材料力学大作业
(12)理论解:
代入约定数值解得: C 电算解:
2000 12 2000 1 C (2 1) 20mm (2 2 3 1) 23.3mrad , 3 100000 6 100000
故:与理论解一致。
第 十九 页 共 二十一 页
第 六 页 共 二十一 页
材料力学大作业
最后,感谢您的使用。
例 2.请验证张少实主编的《新编材料力学》 (第二版)144~146 页的表 7-3 所示内容。 解: 1°首先约定: 梁之长为 3000mm, 梁之抗弯刚度为 100000N· m2, 左端外伸梁的支座在 2000mm 处,凡集中力大小均为 2kN,凡集中力偶大小均为 1000N·m(不过(7)例外) ,凡均布力集度均 为 1kN/m。 2°分项计算: (由于数量众多,不一一计算了。直接出报单。 )
故:与理论解一致。
第 九 页 共 二十一 页
材料力学大作业
(3)理论解
代入约定数据计算得: B 90mrad , B 180mm 电算解:
故:与理论解一致。
第 十 页 共 二十一 页
材料力学大作业
(4)理论解:
增补条件: a 2m ,代入约定数据计算得: B 40mrad , B 93.3mm
电算解:
故:与理论解一致。
第 十一 页 共 二十一 页
材料力学大作业
(5)理论解:
代入约定数据计算得: B 45mrad , B 101.25mm
电算解:
故:与理论解一致。
第 十二 页 共 二十一 页
材料力学大作业
(6)理论解:
代入约定数据计算得: A 10mrad , B 5mrad
max
1 1000 32 5.77 mm , x 1 3 1267.9mm 3 9 3 100000
电算解:
故:与理论解一致。
第 十三 页 共 二十一 页
材料力学大作业
(7)理论解:
代入约定数据计算得: A 5mrad , B 10mrad
ቤተ መጻሕፍቲ ባይዱ
现在轮到我们输入此梁的受力情况了。 我们这道题目只有一个均布载荷作用, 所以我们选择均 布力的个数为 1,并按照题意写入数据。
第 四 页 共 二十一 页
材料力学大作业
按下“写入数据”键,则“生成形变报表”按键激活。按下它。
形变报表出现了!上面显示了此梁的弯矩图、转角函数曲线与挠曲线。可是我们发现这些图形 显得很不完整,很不清楚。为了方便我们进行分析,我们可以点击每一个图片框边上的按钮,对这 些图形进行修正。
B
ql 3 48 EI z
500 23 1.5215mrad 3 0.034 0.054 3 9 0.04 0.06 48 200 10 12 12 500 2 4 1.1411mm 3 0.034 0.0543 9 0.04 0.06 128 200 10 12 12
材料力学大作业
四、程序评价
本程序能够求解简单梁 ( “简支梁” 、 “左端固定悬臂梁” 、 “右端固定悬臂梁” 、 “左端外伸梁” 、 “右端外伸梁” 、 “双段外伸梁”之一,并且允许有三个区段拥有 不同但为常数的抗弯刚度) 的所有简单受力情况, 并且用户能够查询此梁上任意 一点的弯矩、转角和挠度。 本程序的核心部分是 1.将简单梁的所有可能的简单受力情况 (即受集中力、 集中力偶、 均布载荷) 归类为 9 种最一般的受力情况的叠加,并给出其弯矩方程。 2.利用步长为万分之一梁长的二重经典四阶 Runge-Kutta 方法求解材料力 学中的“挠曲线近似微分方程” 。此举乃“以不变应万变” ,充分利用了个人计算 机强大的计算功能, 不但使得挠曲线的求解过程得到了大大简化, 而且在此过程 中,我们直接得到了梁在每一点处的弯矩和转角,可谓是“一箭三雕” 。 3.由于 2 中的 Runge-Kutta 方法给定的初值条件皆为 0, 故在完成计算之后 还需要分情况另行解出两个积分常数。 在求解的过程中, 支座处的弯矩和转角利 用 Lagrange 插值方法给出。 (能够保证一定的精确度) 此外,本程序还提供一个简单的“抗弯刚度计算器” ,能够计算出给定杨氏 模量之材料的简单几何截面的抗弯刚度。 本程序在加强程序的健壮性方面付出了不懈努力。但是在这一方面,开发者 认为还有极大的进步空间。 本程序的误差一般在千分之三以内。当然,这个误差是相较于使用材料力学 方法计算出的理论值而言的。由于材料力学课程中对很多现象进行了近似和假 设, 故开发者不承诺本程序得出的答案和真实的精确值 (有一些可以用弹性力学 或者固体物理学的方法得出)的误差在此误差限以内。 开发者本学期刚刚学完《数值计算方法》课程,而此次材料力学电算学习对 巩固本学期刚学到的方法和思想起到了非常好的作用。 本程序总的来说,比较令人满意。但是在提高功能性,提高健壮性,以及提 高精确度(比如利用绝对精确的 Gauss 公式计算出支座处的弯矩)方面,都有很 大的进步空间。 希往后还要继续深入学习力学知识和数值计算方法的知识, 及时 勤勉,奋发向上。
3000 32 3 1.4 2 5.2mrad 6 100000 3


故:与理论解一致。
第 十五 页 共 二十一 页
材料力学大作业
(9)理论解:
代入约定条件算得: A B 11 .25mrad , C 11 .25mm 电算解:
故:与理论解一致。
第 十六 页 共 二十一 页
材料力学大作业
(10)理论解:
增补条件: a 2m ,代入约定条件解得: 2000 2 1 (3 1) A 8.89mrad ; 6 100000 3
max
2000 1 (32 12 ) 2 32 12 9.677 mm ,其位置为 x 1633.0mm 3 9 3 100000 3
二、程序源代码
本程序采用 Visual Studio 2008 进行编写。具体程序请参见附录。
三、算例
例 1.右端外伸梁受均布载荷如下所示,梁截面为厚度 3mm ,宽 b 40mm , 高 h 60mm 的空心矩形。弹性模量 E 200GPa 。载荷 q 500 N / m , l 2m 。求 自由端的挠度与转角。 (改编自张少实主编《新编材料力学》 (第二版)习题 7-20 (d) ) 解: 1°理论解: 本题可用积分法计算得到:
Harbin Institute of Technology
材料力学上机大作业
题 院 专 班 姓 学
目: 系: 级: 名: 号:
简单梁的变形分析 机电工程学院 1408104 程建华 1140810414 张桂莲 2016 年 6 月 13 日
业:机械设计制造及其自动化
指导教师: 完成时间:
一、 问题描述
本程序的名称是“简单梁的变形计算器” 。使用者需要输入的参数如下所示: 1.梁的类型。 (从“简支梁” 、 “左端固定悬臂梁” 、 “右端固定悬臂梁” 、 “左端 外伸梁” 、 “右端外伸梁” 、 “双段外伸梁”中选择之一) 2.梁的长度。 (单位:毫米) 3.在必要的时候(当梁的种类是“左端外伸梁” 、 “右端外伸梁” 、 “双段外伸 梁”之一时) ,需要输入支座的位置坐标。 4.支座的类型。 (以确保这是一根静定梁, 尽管此输入对实际计算没有任何作 用) 5.区段的数目,以及各区段的起止点。 (最多三段拥有不同截面、不同抗弯刚 度的区段) 6.各区段的抗弯刚度。 (必要时可以使用本程序自带的计算器加以计算) 7.受力基本情况。 (最多可计算 3 个集中力,3 个均布力,3 个集中力偶) 8.各个载荷的大小和作用位置。 (根据 7 中的选择进行填空) 在输入以上参数之后,按下“生成形变报表”键后,输出结果如下所列: 1.此简单梁的五千等分报表。 (某位置的弯矩、转角、挠度大小) 2.挠度图、转角函数图、弯矩图。 3.可以对任意特定位置的弯矩、转角、挠度进行查询。 4.最大弯矩及其坐标,最大转角及其坐标,最大挠度及其坐标。
第 五 页 共 二十一 页
材料力学大作业
经过“放大” 、 “上移”等操作,我们可以很方便地看到三个曲线的形状。同时,我们查询自由 端的信息,得到的结果是 B 1.5216 mrad , 1.1429 mm ,可见,计算结果是非常精确的。
相关文档
最新文档