《BASIC程序集》求取 ⇩

目录1

程序1 利用赋值语句求两数之和、差、积与商1

程序2 使用PRINT语句，求两数之和、差、积与商2

程序3 用某变量的值为其它变量进行赋值3

程序4 用赋值语句来改变某一变量的值4

程序5 输出简单的文字信息和变量的值5

程序6 使用INPUT语句，在执行中程序员为其后的变量来赋值6

程序7 语句READ与DATA的使用方法之一7

程序8 语句READ与DATA的使用方法之二9

程序9 IF语句的用法10

程序10 RESTORE语句的用法12

程序11 在FOR语句的控制下三种打印输出格式14

程序12读8个数，并打印出每一数的立方根、平方根、此8个数之和的平均数的平方根与立方根16

程序13编制各种图案程序19

程序14角度化为弧度21

程序15弧度化为角度22

程序16用两种循环的方式求累加和23

程序17编写求一维数组中除i=j外的其它各元素的累加和的程序25

程序18编写求矩阵非主对角线上各元素之和的程序26

程序19 编写求矩阵的主对角线上的各元素之和的程序27

程序20编写对矩阵A中I与P两行互换的程序28

程序21 编写求多项式之和的程序29

程序22编写求数的阶乘的程序30

程序23编写当n为正整数时求Г函数值的程序31

程序24编写求组合数CM N的程序33

程序25编写连乘A·M П k=1 Ck的程序34

程序26编写求给定K的切比雪夫多项式的函数值的程序35

程序27 编写给定α对？∞ 0 adx/a2+x2三种结果的判断程序36

程序28编写线性渐增函数的程序37

程序29编写阶跃（台阶）函数的程序38

程序30编写一个N×N单位矩阵的程序39

程序31 编写对50个不同的数，按从大到小的方式进行排列的程序40

程序32编写输出正弦函数曲线图形的程序42

程序33 （一）利用IF和TAB等语句编写输出余弦衰减振荡函数曲线的程序44

（二）利用FOR和TAB等语句也可编写输出余弦46

衰减振荡函数曲线的程序46

程序34编写标准正态概率密度函数分布曲线的程序47

程序35编写已知三角形的三个边a、b和c求三角形的面积的程序49

程序36编写计算指数函数、双曲正弦函数、双曲余弦函数和双曲正切函数值的程序50

程序37编写由直角坐标换算出极坐标的程序52

程序38编写使用随机数函数求圆周率的程序；并在已知圆周率和圆面积的条件下求圆的半径和圆周的程序54

程序39编写已知x，求多分支的函数值的程序56

程序40编写求无理数e的近似值的程序58

程序41 编写求二元线性方程组解的程序61

程序42编写求鸡兔同笼问题的程序65

程序43编写求RC电路中某一时刻T的电压程序67

程序44编写求解回路电流值的程序70

程序45编写输出乘法九九表的程序73

程序46编写求素数的程序79

程序47编写在1～1φφ中找出能被3或5整除各个数之和的程序85

程序48 编写分别求三组数据的各元素之和及平方和的程序88

程序49编写给出数据xi,yi(i=1,2,…,n)，求x90

的平均值、标准偏差和x与y的相关系数的程序90

程序50编写用梯形法和辛卜生法求积分数值解的程序93

程序51编写两个矩阵的加法程序98

程序52编写两个矩阵的乘法程序100

程序53编写矩阵的转置程序103

程序54编写求齿形函数值的程序106

程序55用二分法求方程的根108

程序56用简单迭代法求方程的根112

程序57用牛顿法求方程的根114

程序58用线性插值法求方程的根116

程序59用贝努里法求多项式方程的根117

程序60用代数法求四次方程的根124

程序61用牛顿—雷扶生法求二元方程组的解134

程序62用简单消去法解线性方程组137

程序63用无回代过程的消去法解线性方程组141

程序64用克劳特分解法解线性方程组145

程序65用LDLT分解法解对称方程组149

程序66用平方根法解对称正定方程组154

程序67用平方根法解对称方程组158

程序68用追赶法解三对角方程组（1）160

程序69用追赶法解方程组（2）163

程序70用列主元消去法解线性方程组167

程序71用全主元消去法解线性方程组171

程序72用简单迭代法解线性方程组174

程序73用赛德尔迭代法解线性方程组177

程序74用最速下降法解对称正定方程组181

程序75用共轭斜量法解对称正定方程组185

程序76用全主元消去法求行列式的值189

程序77用行主元消去法求矩阵的逆矩阵和对应行列式的值193

程序78用全主元消去法求矩阵的逆矩阵199

程序79求对称正定矩阵的逆矩阵202

程序80求对称正定矩阵的对应行列式的值204

程序81 用雅可比法求实对称矩阵的特征值和特征向量206

程序82用乘幂法（克雷洛夫方法）求矩阵的模最大特征值及相应的特征向量213

程序83用豪斯荷尔德变换化对称矩阵为对称三对角矩阵222

程序84 用对分法求对称三对角方阵的特征值226

程序85拉格朗日插值232

程序86牛顿插值234

程序87贝塞尔插值237

程序88埃特金插值242

程序89爱尔米特插值247

程序90第一种边界条件样条插值（m—关系式）250

程序91 第二种边界条件样条插值（m—关系式）256

程序92第一种边界条件样条插值（M—关系式）262

程序93参数样条插值269

程序94二元三点插值276

程序95二元拟线性插值281

程序96用二次多项式拟合列表函数286

程序97用幂函数y=aebx拟合列表函数291

程序98用变步长梯形法计算定积分296

程序99用变步长辛卜生法计算定积分298

程序100用变步长辛卜生法计算一组具有相同积分限的定积分301

程序101用尤贝格法计算定积分306

程序102用高斯求积公式计算定积分310

程序103用样条插值法求列表函数的定积分315

程序104用变步长辛卜生法计算二重积分319

程序105用蒙特—卡罗法求积分324

程序106用改进的尤拉法（Ⅰ）求一阶微分方程初值问题的数值解328

程序107用改进的尤拉法（Ⅱ）求一阶微分方程初值问题的数值解331

程序108用四阶龙格—库塔方法求一阶常微方程初值问题的数值解法334

程序109用阿达姆斯预估—校正方法求一阶常微方程初值问题的数值解337

程序110用哈明方法（Ⅰ）求一阶常微方程初值问题的数值解341

程序111用哈明方法（Ⅱ）求一阶常微方程初值问题的数值解345

程序112用四阶龙格—库塔法求一阶常微方程组的初值问题的数值解350

程序113用四阶龙格—库塔法求二阶常微方程初值问题的数值解354