C-3. 编写程序：已知固-固界面两边介质速度和密度，求P波和S波垂直入射位移反射和透射系数、能流比 。用该程序计算核幔边界的这些量： 下地幔： α = 13.7 km/s, β = 7.2 km/s, ρ = 5.5 g/cm3 地核： α2 = 8.0 km/s, β2 = 0.0 km/s, ρ2 = 9.9 g/cm3 一、实验原理 根据透射系数，反射系数，位移比和能流比公式计算反射系数，透射系数和位移比，和能流比。P波公式为 同理S波公式和上述公式形式相同。 二、 程序源代码 v1=input('上层速度…

C-2. 编写子函数：对于固-固介质界面，已知P波和S波速度以及入射角，求出P波和S波反射及透射角。（注意：该子函数可以计算并列出入射波的临界角） 一、 实验原理 二、程序源代码 function [ a1,a2,b1,b2] = snel( i,a,vp1,vp2,vs1,vs2 )%本程序一些地方有中文，在某些版本的matlab中可能无法正确显示，但不影响使用。 i=input('请输入波形，p波请输入1，S波请输入2，SH波请输入3:');%........................% a=input(…

C-1. 编写cos (ω t − kx)函数，并画出以下结果： (a) 时间 t 从 0 到 10, 在 x = 1, 当 ω = 1, k = 1. (b) 时间 t 从 0 到 10, 在 x = 0, 当 ω = 4, k = 1. (c) 位置 x从 0 到 10, 在 t = 0, 当 ω = 1,k = 2. (d) 位置x从 0 到 10, 在 t = 0, 当 ω = 1,k = 4. 一、 实验原理 运用matlab编写程序，根据函数解析式 cos (ω t − kx) 分别改变函数角速度等参数…

这是我的一份实验报告        本科生实验报告     填写说明   适用于本科生所有的实验报告（印制实验报告册除外）； 专业填写为专业全称，有专业方向的用小括号标明； 格式要求： 用A4纸双面打印（封面双面打印）或在A4大小纸上用蓝黑色水笔书写。 打印排版：正文用宋体小四号，1.5倍行距，页边距采取默认形式（上下2.54cm，左右2.54cm，页眉1.5cm，页脚1.75cm）。字符间距为默认值（缩放100%，间距：标准）；页码用小五号字底端居中。 具体要求： 题目（二号黑体居中）； 摘要（"摘要"二字用小二…