计算机在化学中的应用-上机实习.docVIP

上机1 Origin软件和Chemdraw软件应用 目的：掌握Origin软件的画图操作和数据拟合方法； 掌握Chemdraw绘制分子结构的方法。 内容：完成以下习题。 化工原理多效蒸发系统优化设计中，要用到不同温度下饱和水蒸气的焓值，且认为焓H与温度T可用多项式H c0+c1T+c2T2来表示。已知0～100 C下焓与温度的关系如表1-10所示，求多项式的拟合系数，并在H～T图上绘出拟合曲线，用“ ”号标出实验数据点。同时练习以下内容：利用样条 spline 、指数上升、高斯法拟合 Fit 或平滑 Smooth 成曲线，双击图形区任何对象 坐标轴风格、标度、轴名、曲线形状、实验点形状、颜色 可做修改，单击选取，按“Del”可删除对象。 T/K 273.15 278.15 283.15 288.15 293.15 298.15 303.15 H/ kJ/kg 2491.3 2500.9 2510.5 2520.6 2530.1 2538.6 2549.5 308.15 313.15 318.15 323.15 328.15 333.15 338.15 343.15 2559.1 2568.7 2577.9 2587.6 2596.8 2606.3 2615.6 2624.4 348.15 353.15 358.15 363.15 368.15 373.15 2629.7 2642.4 2651.2 2660 2668.8 2677.2 2．用Origin软件画出某电池的放电电压和极化电流随时间的变化曲线。 t/min 0 30 60 80 100 120 140 150 i/mA 10 9.51 9.11 8.45 7.80 6.00 4.50 3.00 V/V 1.711 1.290 1.256 1.201 1.141 1.101 1.030 1.000 提示：时间作为x轴，输入3列数据，然后用鼠标拖动定义 涂黑 3列数据，执行“plot / Double Y” 双Y轴 命令即可。最后用“Copy Page”命令粘贴到Word文本中。 3．绘制如下分子结构并确定它们的化学名称。 1 2 3 4．写出反应方程式。 5．求丁烷分子键长、键角、二面角及两个原子的距离。 1 先用Chem 3D作出丁烷球棒图并显示原子类型与编号如下。 2 试求：C 1 -C 2 键长，C 1 -C 2 -C 3 键角，C 1 -C 2 -C 3 -C 4 二面角，C 1 -C 4 的距离。 上机2 Visual Basic程序练习 目的： 1 掌握建立、编辑、运行一个简单VB应用程序的全过程；掌握常用控件对象 窗体、文本框、标签和命令按钮 的作用、常用属性、事件和方法，并应用它们编写简单应用程序； 2 掌握选择结构、循环结构的语法格式和执行过程。 内容：编写程序 1．输入系数a、b和c，求二次方程ax2+bx+c 0的实根。 2．编写程序，找到一个正整数N，要求N的阶乘最接近3000但又不大于3000。 上机3 Newton迭代法解方程 目的： 1 理解牛顿迭代法的原理并能用VB语言实现编程； 2 掌握Sub过程和Function过程，进一步熟悉选择结构和循环结构。 内容：编写程序 1．根据难熔盐的活度积ks，求其在水中的溶解度m的方程式为： 对于每一个ks值该方程都有两个根。若某一难熔盐的活度积为0.047，第一个根的初值范围是0～1.0，第二个根的初值范围是1.0～2.0，试用牛顿迭代法编程求解该方程的两个根。 可参考如下界面设计： 上机4 拉格朗日一元全节点插值 目的： 1 理解拉格朗日一元全节点插值的原理并能用VB语言实现编程； 2 掌握数组的使用，进一步熟悉Sub过程和Function过程。 内容：编写程序 1．从手册查到水在不同温度T下的导热系数 数据如下，分别计算水在7 C、32 C、55 C、64 C时的导热系数。 T/ C 0 10 20 30 40 50 60 70 80 90 /[W/ m K ] 0.553 0.575 0.599 0.618 0.634 0.648 0.659 0.668 0.675 0.680 可参考如下界面设计： 上机5 一元线性拟合 目的： 1 理解一元线性拟合的原理并能用VB语言实现编程； 2 掌握数组的使用，进一步熟悉Sub过程和Function过程。 内容：编写程序 1．将上节数据作一元线性拟合，求拟合方程的斜率、截距和相关系数。 可参考如下界面设计： 上机6 定步长辛普生积分 目的： 1 理解定步长辛普生积分的原理并能用VB语言实现编程。 内容：编写程序 1．已知某化学反应在温度T0下的反应焓为反应体系的等压热容与温度的关