地磁学实验报告

发布时间:2015-01-24 11:08:04   来源:文档文库   
字号:



实验一:

1. 实验目的:初步了解质子旋进磁力仪的工作原理和方法;初步掌握仪器的使用;了解仪器的使用时的注意事项;

2. 实验要求:对实验场地进行测量,并记录数据导入电脑,做出成果图。

3. 实验步骤:学生分两组,分别进行两条测线的测量,记录并导入电脑,完成实验。

4. 实验数据:

实验剖面1

实验剖面2

5.实验小结:在做实验测量数据时,实验员身上不能有带磁性或者可被磁化的金属制品。测量时周围尽量不要聚集人。

实验二:球体磁场特征认识及分析

内容:1.编程实现公式10.2-24的计算。

x=10my=10mR=30m

程序段:

#include"stdio.h"

#include"math.h"

void main()

{float pi=3.14,I,A,b,R=30,t;

int x,y;

FILE *fp,*fp1;

fp=fopen("A.txt","w");

fp1=fopen("B.txt","w");

A=pi/4;

I=pi/4;

b=1; //(b=u0*m)/4*pi

for(x=-100;x<=100;x+=10)

for(y=-100;y<=100;y+=10)

{t=(b/pow(x*x+y*y+R*R,2.5))*((2*R*R-x*x-y*y)*sin(I)*sin(I)+(2*x*x-y*y-R*R)*cos(I)*cos(I)*cos(A)*cos(A)+(2*y*y-x*x-R*R)*cos(I)*cos(I)*sin(A)*sin(A)-3*x*R*sin(2*I)*cos(A)+3*x*y*cos(I)*cos(I)*sin(2*A)-3*y*R*sin(2*I)*sin(A));

fprintf(fp,"%d\t%d\t%f\n",x,y,t);

if(y==0)fprintf(fp1,"%d\t%d\t%f\n",x,y,t);

} fclose(fp);

fclose(fp1);

}

1 I=45º,A=45º

2 I=0º,A=45º

3 A=0,I=0

4 A=45,I=90

地磁学实验报告

学院:地球物理学院

姓名:

学号:

本文来源:https://www.2haoxitong.net/k/doc/00ebc9b7bb4cf7ec4bfed049.html

《地磁学实验报告.doc》
将本文的Word文档下载到电脑,方便收藏和打印
推荐度:
点击下载文档

文档为doc格式