汽车理论驱动力 行驶阻力平衡图
汽车理论名词解释与简答题
二．名词解释1.汽车的动力性：指在良好路面上直线行驶时由汽车受到的纵向外力决定的、所能达到的平均行驶速度。
评价指标:最高车速、加速时间及最大爬坡度2.汽车的后备功率：将发动机功率Pe与汽车经常遇到的阻力功率之差。
公式表示为（Pf Pw）Pe-ηt3.附着力：地面对轮胎切向反作用力的极限值4.汽车功率平衡图：若以纵坐标表示功率，横坐标表示车速，将发动机功率、经常遇到的阻力功率对车速的关系曲线绘在坐标图上，即得功率平衡图。
5.汽车的驱动力图：一般用根据发动机外特性确定的驱动力与车速之间的函数关系曲线Ft—Ua来全面表示汽车的驱动力，称为汽车的驱动力图。
6.最高车速：在水平良好的路面（混凝土或沥青）上汽车能达到的最高行驶车速。
7.发动机特性曲线：将发动机的功率Pe、转矩以及燃油消耗率与发动机曲轴转速n之间的函数关系以曲线表示，则此曲线称为发动机转速特性曲线或简称为发动机特性曲线。
8.附着率：汽车直线行驶状态下，充分发挥驱动力作用时要求的最低附着系数。
9.等速百公里燃油消耗量：汽车在一定载荷下，以最高挡在水平良好路面上等速行驶100km的燃油消耗量。
10.汽车的燃油经济性：在保证动力性的条件下，汽车以尽量少的燃油消耗量经济行驶的能力。
11.等速百公里燃油消耗量曲线：常测出每隔10km/h或20km/h速度间隔的等速百公里燃油消耗量，然后在图上连成曲线12.汽车比功率：单位汽车总质量具有的发动机功率13.同步附着系数：（实际前后制动器制动力分配线）线与（理想前后轮制动器制动力分配曲线）I曲线交点处的附着系数14.I曲线：前、后车轮同时抱死时前、后轮制动器制动力的关系曲线15.制动效能：在良好路面上，汽车以一定初速制动到停车的制动距离或制动时汽车的减速度。
它是制动性能最基本的评价指标。
16.汽车的制动性：汽车行驶时能在短距离内停车且维持行驶方向稳定性和在下长坡时能维持一定车速的能力17.地面制动力：由制动力矩所引起的、地面作用在车轮上的切向力。
汽车理论：第二章 汽车的动力性
▪
2)以任一条
1 j
曲线为例，例如直接档，将加速过程
速度区间分为若干间隔，常取 5km/ h为一段。定出各
间隔的微元面积 1、2、3 ，…,如图。
▪ 3)计算出从初速度 分别加速到 u1、u2、u3 、…，的
加速时间：u0
t1
1
3.6ab
s
t2
1 2
3.6ab
s
t3
1
2
3.6ab
3
s
…………………
定动力性的方法； ▪ （3）分析▪ 一、汽车的动力性指标 ▪ 从获得尽可能高的平均行驶速度的观点出
发，汽车的动力性主要可由三方面的指标来 评定，即： ▪ 1)汽车的最高车速 ua max；
▪ 2)汽车的加速时间 t ；
▪ 3)汽车能爬上的最大坡度 imax。
以直接档行驶，若 i0max 过小， 则汽车行驶中遇到 较小的坡度就被迫换档，因而影响汽车的平均行驶 速度和燃料消耗量。
▪ 因为汽车以全部剩余驱动力克服最大坡度
时，du 0 。 所以，根据驱动力平衡方程得 dt Fi Ft Ff Fw
▪ 式中 Fi G sin , Ff Gf cos
计算出 Fw 对
具有四档变速器的某汽车的驱动力—行驶阻力平衡图
由于是的二次方函数， Fw ua曲线应为抛物线。 在驱动力图上，先画出 Ff ua 曲线，再将 Fw ua叠加画在 Ff ua曲线的上 方，就得到汽车的等速行驶阻力曲线 (Ff Fw) ua 。 其曲线较二次抛物线上升略陡，因为车速较高时略有增加。
▪ 由于加速过程中发动机非稳定工况的影响，道路试验所得的 加速时间往往要低于计算结果，大约等于按发动机扭矩降低 10～15％的计算值。
考试试题(汽车理论)
一．判断题（2分/个，24分）1. 汽车的爬坡能力由汽车的驱动力决定。
（×）解：汽车的动力性能不止受到驱动力的制约还受到轮胎与地面附着条件的限制2. 弹性迟滞损失是以滚动阻力偶矩的形式作用在车轮上阻碍汽车的运动。
（√）3. 子午线轮胎的滚动阻力系数比普通斜交轮胎的滚动阻力系数大。
（×）解：应该是小4. 汽车的最高车速对应于发动机的最高转速。
（×） 解：0377.0i i rn u g a =且与功率平衡图来确定最高转速 5. 有的汽车2档的加速度比1档的加速度大。
（√）6. 汽车以高档行驶时，发动机的负荷率高，百公里耗油量最大。
（√）7. 只要发动机省油，汽车就一定省油。
（×）解：发动机负荷率高只是省油的一个方面另外汽车列车的质量利用系数大小也关系到是否省油8. 机械式变速器各档 传动比大体上按等比级数分配。
（√）9. 汽车的地面制动力由制动器制动力的大小决定。
（×）解：取决于两个摩擦副的摩擦力，⑴制动器内制动摩擦片与制动鼓⑵轮胎与地面的摩擦力10. 稳态转向特性为不足转向的汽车，其瞬态转向特性也是稳态的。
（√）11. 人体承受4~8HZ 垂直振动的能力是最强的。
（√）12. 提高车身固有频率，可以减小车身振动加速度。
（）二．某些汽车装有超速档，试分析超速档对汽车动力性和燃油经济性的影响。
（7分）三．汽车的稳态转向特性可用稳定性因数K 表征⎪⎪⎭⎫ ⎝⎛-=122k b k a L m K 试利用上式分析下列问题：（共3⨯5分=15分）1） 前轮充气压力高于标准气压，汽车稳态转向特性向什么方向变化；2） 后轴车轮由单胎变为双胎（其他结构不变），汽车稳态转向特性向什么方向变化；3） 后轴车轮由子午线轮胎换为普通斜交轮胎，汽车稳态转向特性向什么方向变化；4） 汽车装载后重心后移，汽车稳态转向特性向什么方向变化；5） 将前后悬架侧倾角刚度比值21φφK K 提高后，汽车稳态转向特性向什么方向变化；四．金属式无级变速器（CVT ）能够提高汽车的燃油经济性，试说明其理论依据。
汽车理论 第二章汽车动力性(常)
Acceleration time
汽车加速度曲线
GB/T12543—90《汽车加速性能试验方法》 8
9
爬坡能力的评价
▪ 以满载、良好路面上的imax来表示。
▪
－－商用车30％或16.5º；
▪
－－越野汽车60％或31º；
▪ 轿车最高车速较大， 且通常在良好的市 区道路行驶，一般不强调爬坡度。
▪ 有的国家要求汽车在常遇坡道上汽车必 须保持的速度表明其加速能力。
r
21.15
36
1. 最大速度和部分负荷时的力平衡 以及 uamax 和部分负荷时的等速 2. 加速能力
3. 最大爬坡度
ua uam a,x此时F， i mgsin i tg(sin1 Ft Ff Fw )
mg
37
▪ 2. 加速能力 它用aj,但aj不方便评价。 通常用加速时间或加速距离来评价。
28
▪ δ 主要与发动机飞轮的转动惯量、车轮的 转动惯量以及传动系统的转动比有关，即
▪
▪ 式中：Iw为车轮的转动惯量；If为飞轮的转 动惯量。
29
Ft Ff Fw Fi Fj
Ttqi0 ig T mg f cosCD Aua2
r
21.15
mgsinm du
dt
30
四、汽车行驶条件
▪ 1. 汽车行驶的驱动－附着条件
温度、转速、油面高度等有关。
16
▪ 汽车传动系总成机械效率
▪ 4～6档变速器ηT =0.96
▪ 6～8档变速器ηT =0.95
▪ 传动轴ηT = 0.98
▪ 主减速器ηT = 0.96 (单级)
▪
ηT = 0.92(双级)
▪ 汽车传动系机械效率
汽车理论汽车的驱动力和行驶阻力
Ttqigi0 T
r
可知
➢Ft 与发动机转矩Ttq、变速器传动比 ig、主减 速器传动比 i0、传动系旳机械效率ηT 和车轮半径 r 等原因有关。
思索
能否解释为何汽车低挡旳加速能力好于高挡？
4
第二节 汽车旳驱动力与行驶阻力
➢计算驱动力是为了拟定汽车旳动力性指标，也即要找出 驱动力和车速旳关系。
➢驱动力和车速都与发动机特征有直接关系，能够经过发 动机特征曲线找出驱动力与车速之间旳关系。
4.汽车旳驱动力图
根据下面两式
Ft
Ttqigi 0 T
r
ua
0.377 nr ig i 0
以及发动机外特征曲线
做出旳Ft - ua关系图，即驱动力图。
16
第二节 汽车旳驱动力与行驶阻力
例：已知奥迪A4轿车发动机旳数据（如下表所示），
ig1=2.13，i0=6.333，r=0.317m，ηT=0.90，由
第一章 汽车动力性
第二节 汽车旳驱动力与行驶阻力
➢本节要点计算并分析汽车行驶过程中旳 驱动力和行驶阻力。
返回目录 1
第二节 汽车旳驱动力与行驶阻力
一、驱动力Ft
ua
驱动力Ft：发动机产 生旳转矩经传动系传到
驱动轮，产生驱动力矩
Tt
Tt，驱动轮在Tt旳作用
下给地面作用一圆周力
r
F0，地面对驱动轮旳反
（4）驱动力
32
第二节 汽车旳驱动力与行驶阻力
思索
为何驱动力系数很大时，气压越低 f 越小？
Ft胎面滑移Ff
pa接地面积胎面滑移滑移引起旳Ff
33
第二节 汽车旳驱动力与行驶阻力
思索 上高速公路前要检验胎压，在给定旳胎压范围内，胎
汽车理论习题
汽车理论习题：1.31）绘制汽车驱动力与行驶阻力平衡图。
2）求汽车最高车速，最大爬坡度及克服该坡度时相应的附着率。
3）绘制汽车行驶加速度倒数曲线，用图解积分法求汽车用2档起步加速行驶至70km/h 的车速－时间曲线，或者用计算机求汽车用2档起步加速行驶至70km/h 的加速时间。
分析：本题主要考察知识点为汽车驱动力－行使阻力平衡图的应用和附着率的计算、等效坡度的概念。
应明确道路的概念：坡度的定义tan i α=。
求最大爬坡度时可以对行使方程进行适当简化，可以简化的内容包括两项cos 1α≈和sin tan αα≈，简化的前提是道路坡度角不大，当坡度角较大时简化带来的误差会增大。
计算时，要说明做了怎样的简化并对简化的合理性进行评估。
2）求最大爬坡度及克服该坡度时相应的附着率 ②求最大爬坡度：0=dtdu，()w f t i F F F F +-= 一般汽车最大爬坡度约为30％左右，所以利用行驶方程确定最大爬坡度时应以G sin α作为坡度阻力，即()sin t f w G F F F α=-+，tan i α=()⎪⎪⎭⎫ ⎝⎛+-=G F F F i w f t arcsin tan汽车最大爬坡度max i 为Ⅰ档时的最大爬坡度。
利用编程计算可得，352.0max =i 。
③如是前轮驱动，1ϕC ＝qb hg q L L -；相应的附着率1ϕC 为1.20，不合理，舍去。
如是后轮驱动，2ϕC ＝qa hg q L L+；相应的附着率2ϕC 为0.50。
3）绘制汽车行驶加速度倒数曲线，求加速时间因各档加速度倒数曲线并无交点，所以从二档开始直接积分即可。
常见错误是未将车速的单位进行换算，时间大3.6倍。
1.7确定上述F.F 轿车在φ＝0.2及0.7路面上的附着力，并求由附着力所决定的极限最高车速与极限最大爬坡度及极限最大加速度（在求最大爬坡度和最大加速度时可设Fw=0）。
（1）求极限最高车速的求解可根据汽车行驶方程得到。
河南工业大学汽车理论VB绘制汽车驱动力与行驶阻力平衡图_汽车功率平衡图。
3.2 实验记录（核心代码及调试过程）1.核心代码：'.............驱动力与行驶阻力平衡图Private Sub Command1_Click()Picture1.DrawWidth = 1Picture1.ClsDim i, j, n As IntegerDim Ft, Ff, Fw, Umax, Uumax As SinglePicture1.Scale (-20, 18000)-(150, -2000)Picture1.Line (0, 0)-(125, 0): Picture1.Line (0, 0)-(0, 16000)Picture1.CurrentX = 125: Picture1.CurrentY = -300: Picture1.Print "Ua(km/h)"Picture1.CurrentX = 125: Picture1.CurrentY = 192: Picture1.Print "→"Picture1.CurrentX = 5: Picture1.CurrentY = 16000: Picture1.Print "F/N"Picture1.CurrentX = -2: Picture1.CurrentY = 16000: Picture1.Print "↑"Picture1.CurrentX = -5: Picture1.CurrentY = -1: Picture1.Print "0"For i = 20 To 120 Step 20Picture1.Line (i, 0)-(i, 200)Picture1.CurrentX = i - 5: Picture1.CurrentY = -10: Picture1.Print iNext iFor i = 1000 To 15000 Step 1000Picture1.Line (0, i)-(1.5, i)Picture1.CurrentX = -15: Picture1.CurrentY = i + 50: Picture1.Print iNext iPicture1.DrawWidth = 2For n = 600 To 4000Tq = -19.313 + 295.27 * (n / 1000) - 165.44 * (n / 1000) ^ 2 + 40.874 * (n / 1000) ^ 3 - 3.8445 * (n / 1000) ^ 4For j = 1 To 5Ft = Tq * i0 * ηt * x(j) / rFf = f * 9.8 * mUa = 0.377 * r * n / (i0 * x(j))Fw = 0.5 * 1.2258 * ca * (Ua / 3.6) ^ 2Picture1.Circle (Ua, Ft), 0.1, vbBluePicture1.Circle (Ua, (Ff + Fw)), 0.1, vbRedUmax = UmaxIf Ua > Umax ThenUmax = UaElseUmax = UmaxEnd IfNext jNext nUumax = CInt(Umax * 100) / 100Picture1.CurrentX = 40: Picture1.CurrentY = 16000: Picture1.Print "最高车速为："; Uumax; "km/h"End Sub'...........动力特性图Private Sub Command3_Click()Picture1.DrawWidth = 1Picture1.ClsDim i, j, n As IntegerDim Ft, Fw, D As SinglePicture1.Scale (-20, 90)-(150, -10)Picture1.Line (0, 0)-(125, 0): Picture1.Line (0, 0)-(0, 85)Picture1.CurrentX = 125: Picture1.CurrentY = -3: Picture1.Print "Ua(km/h)"Picture1.CurrentX = 125: Picture1.CurrentY = 0.9: Picture1.Print "→"Picture1.CurrentX = 5: Picture1.CurrentY = 85: Picture1.Print "D"Picture1.CurrentX = -2: Picture1.CurrentY = 85: Picture1.Print "↑"Picture1.CurrentX = -5: Picture1.CurrentY = -1: Picture1.Print "0"For i = 20 To 120 Step 20Picture1.Line (i, 0)-(i, 1)Picture1.CurrentX = i - 5: Picture1.CurrentY = -1: Picture1.Print iNext iFor i = 20 To 80 Step 20Picture1.Line (0, i)-(2, i)Picture1.CurrentX = -10: Picture1.CurrentY = i + 1: Picture1.Print "0"; i / 200Next iPicture1.DrawWidth = 2For n = 600 To 4000For j = 1 To 5Tq = -19.313 + 295.27 * (n / 1000) - 165.44 * (n / 1000) ^ 2 + 40.874 * (n / 1000) ^ 3 - 3.8445 * (n / 1000) ^ 4Ft = Tq * i0 * ηt * x(j) / rUa = 0.377 * r * n / (i0 * x(j))Fw = 0.5 * 1.2258 * ca * (Ua / 3.6) ^ 2D = 200 * (Ft - Fw) / (m * 9.8)If D > 0 ThenPicture1.Circle (Ua, D), 0.1, vbBlueEnd IfNext jNext nEnd Sub'.............功率平衡图Private Sub Command4_Click()Picture1.DrawWidth = 1Picture1.ClsDim i, j, n As IntegerDim Pe, Pf, Pw As SinglePicture1.Scale (-20, 80)-(150, -10)Picture1.Line (0, 0)-(125, 0): Picture1.Line (0, 0)-(0, 75)Picture1.CurrentX = 125: Picture1.CurrentY = -3: Picture1.Print "Ua(km/h)"Picture1.CurrentX = 125: Picture1.CurrentY = 0.9: Picture1.Print "→"Picture1.CurrentX = 5: Picture1.CurrentY = 75: Picture1.Print "Pe/kw"Picture1.CurrentX = -2: Picture1.CurrentY = 75: Picture1.Print "↑"Picture1.CurrentX = -5: Picture1.CurrentY = -1: Picture1.Print "0"For i = 20 To 120 Step 20Picture1.Line (i, 0)-(i, 1)Picture1.CurrentX = i - 5: Picture1.CurrentY = -1: Picture1.Print iNext iFor i = 10 To 70 Step 10Picture1.Line (0, i)-(2, i)Picture1.CurrentX = -10: Picture1.CurrentY = i + 1: Picture1.Print iNext iPicture1.DrawWidth = 2For n = 600 To 4000For j = 1 To 5Tq = -19.313 + 295.27 * (n / 1000) - 165.44 * (n / 1000) ^ 2 + 40.874 * (n / 1000) ^ 3 - 3.8445 * (n / 1000) ^ 4Pe = Tq * n / 9550Ua = 0.377 * r * n / (i0 * x(j))Pf = (m * f * Ua / 3600) / ηtPw = (ca * Ua ^ 3 / 76140) / ηtPicture1.Circle (Ua, Pe), 0.1, vbBluePicture1.Circle (Ua, (Pf + Pw)), 0.1, vbRedNext jNext nEnd Sub'...........外特性曲线Private Sub Command5_Click()Picture1.DrawWidth = 1Picture1.ClsDim i, n As IntegerDim Pe As SinglePicture1.Scale (-400, 250)-(5000, -20)Picture1.Line (0, 0)-(4500, 0): Picture1.Line (0, 0)-(0, 200)Picture1.CurrentX = 4300: Picture1.CurrentY = -3: Picture1.Print "n(r/min)"Picture1.CurrentX = 4500: Picture1.CurrentY = 3: Picture1.Print "→"Picture1.CurrentX = 100: Picture1.CurrentY = 200: Picture1.Print "Ttq(N*m)"Picture1.CurrentX = 100: Picture1.CurrentY = 80: Picture1.Print "Pe(kw)"Picture1.CurrentX = -60: Picture1.CurrentY = 205: Picture1.Print "↑"Picture1.CurrentX = -5: Picture1.CurrentY = -1: Picture1.Print "0"For i = 500 To 4000 Step 500Picture1.Line (i, 0)-(i, 3)Picture1.CurrentX = i - 200: Picture1.CurrentY = -1: Picture1.Print iNext iFor i = 20 To 180 Step 20Picture1.Line (0, i)-(50, i)Picture1.CurrentX = -300: Picture1.CurrentY = i + 3: Picture1.Print iNext iPicture1.DrawWidth = 2For n = 600 To 4000Tq = -19.313 + 295.27 * (n / 1000) - 165.44 * (n / 1000) ^ 2 + 40.874 * (n / 1000)^ 3 - 3.8445 * (n / 1000) ^ 4Pe = Tq * n / 9550Picture1.Circle (n, Pe), 2, vbRed Picture1.Circle (n, Tq), 2, vbBlue Next nEnd Sub2.数据图表：驱动力与行驶阻力平衡图：动力特性图：爬坡度图：发动机外特性曲线：发动机功率平衡图：3.2 实验记录（核心代码及调试过程）1.核心代码：'.........加速度的倒数曲线Private Sub Command7_Click()Picture1.DrawWidth = 1Picture1.ClsDim i, j, n As IntegerDim Ff, Ft, Fw, a, δ As SinglePicture1.Scale (-20, 160)-(150, -10)Picture1.Line (0, 0)-(125, 0): Picture1.Line (0, 0)-(0, 150)Picture1.CurrentX = 125: Picture1.CurrentY = -3: Picture1.Print "Ua(km/h)"Picture1.CurrentX = 125: Picture1.CurrentY = 1.8: Picture1.Print "→"Picture1.CurrentX = 5: Picture1.CurrentY = 150: Picture1.Print "1/a"Picture1.CurrentX = -2: Picture1.CurrentY = 150: Picture1.Print "↑"Picture1.CurrentX = -5: Picture1.CurrentY = -1: Picture1.Print "0"For i = 20 To 120 Step 20Picture1.Line (i, 0)-(i, 1.5)Picture1.CurrentX = i - 5: Picture1.CurrentY = -1: Picture1.Print iNext iFor i = 10 To 140 Step 10Picture1.Line (0, i)-(2, i)Picture1.CurrentX = -10: Picture1.CurrentY = i + 1: Picture1.Print i / 10Next iPicture1.DrawWidth = 2For n = 600 To 4000For j = 1 To 5Tq = -19.313 + 295.27 * (n / 1000) - 165.44 * (n / 1000) ^ 2 + 40.874 * (n / 1000) ^ 3 - 3.8445 * (n / 1000) ^ 4Ft = Tq * i0 * ηt * x(j) / rUa = 0.377 * r * n / (i0 * x(j))Fw = 0.5 * 1.2258 * ca * (Ua / 3.6) ^ 2Ff = f * 9.8 * mδ = 1 + Iw / (m * r ^ 2) + If1 * x(j) ^ 2 * i0 ^ 2 * ηt / (m * r ^ 2) a = (Ft - Ff - Fw) / (δ * m)If a > 0 ThenPicture1.Circle (Ua, 10 / a), 0.1, vbBlueEnd IfNext jNext nEnd Sub'..............直接挡加速时间曲线Private Sub Command8_Click()Picture1.DrawWidth = 1Picture1.ClsDim i, n As IntegerDim Ff, Ft, Fw, a, δ, t, tt As SinglePicture1.Scale (-10, 90)-(60, -10)Picture1.Line (0, 0)-(55, 0): Picture1.Line (0, 0)-(0, 75)Picture1.CurrentX = 53: Picture1.CurrentY = -3: Picture1.Print "t(s)"Picture1.CurrentX = 55: Picture1.CurrentY = 0.9: Picture1.Print "→"Picture1.CurrentX = 2: Picture1.CurrentY = 75: Picture1.Print "Ua(km/h)"Picture1.CurrentX = -0.7: Picture1.CurrentY = 75: Picture1.Print "↑"Picture1.CurrentX = -3: Picture1.CurrentY = -1: Picture1.Print "0"For i = 10 To 50 Step 10Picture1.Line (i, 0)-(i, 1)Picture1.CurrentX = i - 1.5: Picture1.CurrentY = -1: Picture1.Print iNext iFor i = 10 To 70 Step 10Picture1.Line (0, i)-(1, i)Picture1.CurrentX = -5: Picture1.CurrentY = i + 1: Picture1.Print iNext it = 0For Ua = 0 To 70 Step 0.01n = Ua * i0 * x(4) / 0.377 / rIf n >= 600 ThenTq = -19.313 + 295.27 * (n / 1000) - 165.44 * (n / 1000) ^ 2 + 40.874 * (n / 1000) ^ 3 - 3.8445 * (n / 1000) ^ 4Ft = Tq * i0 * ηt * x(4) / rFw = 0.5 * 1.2258 * ca * (Ua / 3.6) ^ 2Ff = f * 9.8 * mδ = 1 + Iw / (m * r ^ 2) + If1 * x(4) ^ 2 * i0 ^ 2 * ηt / (m * r ^ 2)a = (Ft - Ff - Fw) / (δ * m)t = t + 1 * 0.01 / a / 3.6Picture1.Circle (t, Ua), 0.1, vbBlueEnd IfNext Uatt = CInt(t * 100) / 100Picture1.CurrentX = 15: Picture1.CurrentY = 80: Picture1.Print "0-70（km/h）直接挡加速时间为："; tt; "s"End Sub2.数据图表：加速度曲线图：加速度倒数曲线：直接挡加速时间图：3.2 实验记录（核心代码及调试过程）1.核心代码'.........最高挡百公里耗油量Private Sub Command1_Click()Dim n(1 To 8), B0(1 To 8), B1(1 To 8), B2(1 To 8), B3(1 To 8), B4(1 To 8)n(1) = 815: n(2) = 1207: n(3) = 1614: n(4) = 2012: n(5) = 2603: n(6) = 3006: n(7) = 3403: n(8) = 3804B0(1) = 1326.8: B0(2) = 1354.7: B0(3) = 1284.4: B0(4) = 1122.9: B0(5) = 1141#: B0(6) = 1051.2: B0(7) = 1233.9: B0(8) = 1129.7B1(1) = -416.46: B1(2) = -303.98: B1(3) = -189.75: B1(4) = -121.59: B1(5) = -98.893: B1(6) = -73.714: B1(7) = -84.478: B1(8) = -45.291B2(1) = 72.379: B2(2) = 36.657: B2(3) = 14.524: B2(4) = 7.0035: B2(5) = 4.4763: B2(6) = 2.8593: B2(7) = 2.9788: B2(8) = 0.71113B3(1) = -5.8629: B3(2) = -2.0553: B3(3) = -0.51184: B3(4) = -0.18517: B3(5) = -0.091077: B3(6) = -0.05138: B3(7) = -0.047449: B3(8) = -0.00075215B4(1) = 0.17768: B4(2) = 0.043072: B4(3) = 0.0068164: B4(4) = 0.0018555: B4(5) = 0.00068906: B4(6) = 0.00035032: B4(7) = 0.0002823: B4(8) = -0.000038568Picture1.Scale (-10, 50)-(150, -10)Picture1.Line (0, 0)-(120, 0): Picture1.Line (0, 0)-(0, 45)Picture1.CurrentX = 120: Picture1.CurrentY = -3: Picture1.Print "Ua(km/h)"Picture1.CurrentX = 120: Picture1.CurrentY = 1: Picture1.Print "→"Picture1.CurrentX = 5: Picture1.CurrentY = 45: Picture1.Print "Qs(L/100km)"Picture1.CurrentX = -2.5: Picture1.CurrentY = 46: Picture1.Print "↑"Picture1.CurrentX = -3: Picture1.CurrentY = -1: Picture1.Print "0"For i = 20 To 100 Step 20Picture1.Line (i, 0)-(i, 1)Picture1.CurrentX = i - 6: Picture1.CurrentY = -1: Picture1.Print iNext iFor i = 10 To 40 Step 10Picture1.Line (0, i)-(3, i)Picture1.CurrentX = -12: Picture1.CurrentY = i + 1: Picture1.Print iNext ig = 3880 * 9.8f = 0.013CdA = 2.77ηt = 0.85i0 = 5.83r = 0.367Uamin = 0.377 * r * n(1) / (0.793 * i0)Qmin = 100Picture1.DrawWidth = 2For ua = Uamin To 100 Step 0.01Pe = (g * f * ua / 3600 + CdA * ua ^ 3 / 76140) / ηtnn = 0.793 * i0 * ua / (0.377 * r)For i = 1 To 7If nn >= n(i) And nn <= n(i + 1) ThenB0B0 = B0(i) + (B0(i + 1) - B0(i)) * (nn - n(i)) / (n(i + 1) - n(i))B1B1 = B1(i) + (B1(i + 1) - B1(i)) * (nn - n(i)) / (n(i + 1) - n(i))B2B2 = B2(i) + (B2(i + 1) - B2(i)) * (nn - n(i)) / (n(i + 1) - n(i))B3B3 = B3(i) + (B3(i + 1) - B3(i)) * (nn - n(i)) / (n(i + 1) - n(i))B4B4 = B4(i) + (B4(i + 1) - B4(i)) * (nn - n(i)) / (n(i + 1) - n(i))End IfNext iBe = B0B0 + B1B1 * Pe + B2B2 * Pe ^ 2 + B3B3 * Pe ^ 3 + B4B4 * Pe ^ 4Qs = Pe * Be / (1.02 * 7 * ua)Picture1.PSet (ua, Qs), vbBlueIf Qs < Qmin ThenQmin = QsUj = uaEnd IfNext uaText1.Text = CInt(Uj * 100) / 100Text2.Text = CInt(Qmin * 100) / 100End Sub'..............次高挡百公里耗油量Private Sub Command2_Click()Picture1.ClsPicture1.DrawWidth = 1Dim n(1 To 8), B0(1 To 8), B1(1 To 8), B2(1 To 8), B3(1 To 8), B4(1 To 8)n(1) = 815: n(2) = 1207: n(3) = 1614: n(4) = 2012: n(5) = 2603: n(6) = 3006: n(7) = 3403: n(8) = 3804B0(1) = 1326.8: B0(2) = 1354.7: B0(3) = 1284.4: B0(4) = 1122.9: B0(5) = 1141#: B0(6) = 1051.2: B0(7) = 1233.9: B0(8) = 1129.7B1(1) = -416.46: B1(2) = -303.98: B1(3) = -189.75: B1(4) = -121.59: B1(5) = -98.893: B1(6) = -73.714: B1(7) = -84.478: B1(8) = -45.291B2(1) = 72.379: B2(2) = 36.657: B2(3) = 14.524: B2(4) = 7.0035: B2(5) = 4.4763: B2(6) = 2.8593: B2(7) = 2.9788: B2(8) = 0.71113B3(1) = -5.8629: B3(2) = -2.0553: B3(3) = -0.51184: B3(4) = -0.18517: B3(5) = -0.091077: B3(6) = -0.05138: B3(7) = -0.047449: B3(8) = -0.00075215B4(1) = 0.17768: B4(2) = 0.043072: B4(3) = 0.0068164: B4(4) = 0.0018555: B4(5) = 0.00068906: B4(6) = 0.00035032: B4(7) = 0.0002823: B4(8) = -0.000038568Picture1.Scale (-10, 50)-(150, -10)Picture1.Line (0, 0)-(120, 0): Picture1.Line (0, 0)-(0, 45)Picture1.CurrentX = 120: Picture1.CurrentY = -3: Picture1.Print "Ua(km/h)"Picture1.CurrentX = 120: Picture1.CurrentY = 1: Picture1.Print "→"Picture1.CurrentX = 5: Picture1.CurrentY = 45: Picture1.Print "Qs(L/100km)"Picture1.CurrentX = -2.5: Picture1.CurrentY = 46: Picture1.Print "↑"Picture1.CurrentX = -3: Picture1.CurrentY = -1: Picture1.Print "0"For i = 20 To 100 Step 20Picture1.Line (i, 0)-(i, 1)Picture1.CurrentX = i - 6: Picture1.CurrentY = -1: Picture1.Print iNext iFor i = 10 To 40 Step 10Picture1.Line (0, i)-(3, i)Picture1.CurrentX = -12: Picture1.CurrentY = i + 1: Picture1.Print iNext iPicture1.DrawWidth = 2m = 3880g = 3880 * 9.8f = 0.013CdA = 2.77ηt = 0.85i0 = 5.83r = 0.367Qmin = 100For ua = 25 To 100 Step 0.01Pe = (g * f * ua / 3600 + CdA * ua ^ 3 / 76140) / ηtnn = 0.793 * i0 * ua / (0.377 * r)For i = 1 To 7If nn >= n(i) And nn <= n(i + 1) ThenB0B0 = B0(i) + (B0(i + 1) - B0(i)) * (nn - n(i)) / (n(i + 1) - n(i)) B1B1 = B1(i) + (B1(i + 1) - B1(i)) * (nn - n(i)) / (n(i + 1) - n(i)) B2B2 = B2(i) + (B2(i + 1) - B2(i)) * (nn - n(i)) / (n(i + 1) - n(i)) B3B3 = B3(i) + (B3(i + 1) - B3(i)) * (nn - n(i)) / (n(i + 1) - n(i)) B4B4 = B4(i) + (B4(i + 1) - B4(i)) * (nn - n(i)) / (n(i + 1) - n(i)) End IfNext iBe = B0B0 + B1B1 * Pe + B2B2 * Pe ^ 2 + B3B3 * Pe ^ 3 + B4B4 * Pe ^ 4Qs = Pe * Be / (1.02 * 7 * ua)Picture1.PSet (ua, Qs), vbRedIf Qs < Qmin ThenQmin = QsUj = uaEnd IfNext uaText1.Text = CInt(Uj * 100) / 100Text2.Text = CInt(Qmin * 100) / 100End Sub2.数据图表：最高档等速百公里燃油消耗量曲线图：次高档等速百公里燃油消耗量曲线图：河南工业大学第 页21。
汽车理论课程设计
精心整理《汽车理论》设计报告汽车动力性、经济性的计算机模拟目录1汽车驱动力图 (1)1.1汽车驱动力图简介 (1)1.2汽车驱动力图 (2)2汽车驱动力-行驶阻力平衡图 (2)2.12.233.13.244.14.255.1汽车动力特性图简介 (6)5.2汽车动力特性图 (6)6汽车功率平衡图 (6)6.1汽车功率平衡图简介 (6)6.2汽车功率平衡图 (7)7汽车百公里油耗图 (7)7.1汽车百公里油耗图简介 (7)7.2汽车百公里油耗图 (8)参考文献 (8)附录 (8)汽车动力性、经济性的计算机模拟张少波（）摘要：通过MATLAB 计算机软件进行汽车动力性、经济性的计算机模拟，模拟得出汽车的各种特性曲线。
包括：驱动力图，驱动力-行驶阻力平衡图，爬坡度图，加速度图，动力特性图，功率平衡图，百公里油耗图。
同时对汽车特性曲线的计算公式加以统计汇总学习。
因此驱动力为（1.3）汽油发动机使用外特性的Tq-n 曲线的拟合公式为（1.4）一般用根据发动机外特性确定的驱动力与车速之间的函数关系曲线F t -u a 来全面表示汽车的驱动力，称为汽车的驱动力图。
设计中的汽车有了发动机的外特性曲线、传动系的传动比、传动效率、车轮半径等参数后，即可用式（1.1）求rT 0t T g tq i i T η=出各个档位的F t 值，再根据发动机转速与汽车行驶速度之间转换关系求出u a ，即可求得各个档位的F t 于u a 曲线。
发动机转速与汽车行驶速度之间的关系式为（1.5） 式中，u a 为汽车行驶速度（km/h ）;n 为发动机转速（r/min ）;r 为车轮半径（m ）; i g 为变速器传动比；i 0为主减速器传动比。
另：实际行驶中，发动机常在节气门部分开启下工作，相应的驱动力要比它小。
1.2汽车驱动力图其车辆基本参数见附录1，其Matlab 程序见附录2。
轮胎的构造、材料、气压等有关。
这里选取滚动阻力系数为良好的沥青或混凝土路面滚动阻力系数。