当前位置:首页 >> 数学 >> 高中数学必修三程序大全

高中数学必修三程序大全


Program and list(应用程序和目录)
01. BAS 求和 a+aa+aaa+aaaa+....+aaa....a(a 大于等 1 小于等于 9 的整数 Input “a=”;a Input “n=”;n T=0 S=0 i=1 While i<=n T=10*t+a S=s+t I=i+1 Wend Print “s=”,s end 02. BAS 求和 a+aa+aaa+aaaa+....+aaa....a(a 大于等 1 小于等于 9 的整数 Input “a=”;a Input “n=”;n T=0 S=0 i=1 While i<=n t=t+a s=s+t t=10*a i=i+1 Wend Print “s=”,s end 03.BAS 求 ab ? ba 值

04.BAS

求一个数的绝对值

Input “x=”;x Let y=abs(x) Print “the number absolute value is”;y 05.BAS 求一个数的绝对值 Inupt “x=”;x If x>0 then else

Print “absolute value is”;x

End if end 06.ABS

If x=0 then Print “absolute value is”;0 Else Print “abosolute value is”;-x End if

任给一个自然数 a( a ?[1,9] 输出 aaaa…a(n 个 a 组成的 n 位数) Input “a=”;a Input “n=”;n S=0 i=1 while i<=n s=s+10^(i-1) i=i+1 wend let s=a*s print s end 07.BAS 求和:1 ? 10 ? 102 ? 103 ? .... ? 10n Input “n=”;n i=1 s=0 while i<=n-1 s=s+10^(i-1) i=i+1 wend print “s=”;s end

Input “a=”;a; Input “b=”;b Print “s=”;a^b+b^a End

08.BAS

解一元二次方程

Input “a=”;a Input “b=”;b Input “c=”;c Let d=b^2—4*a*c If d>=0 then Let p=-b/(2*a) Let q=SQR(d)/(2*a) If d=0 then Print “the equation is one real root”;p Else X1=p+q X2=p-q Print “two difference root” Print “x1=”;x1;”x2=”;x2 End if End if End

10.BAS a∈N,1≦a≦9, 求 a+aa+aaa+aaaa+....+aaa....a 的值 Program: Input “a=”;a Input “n=”;n Let i=1 Let s=0 do s=s+10^(i-1) i=i+1 loop until i>n let s=a*s print :s=”;s end 11.BAS 求两个正整数的最大公约数 【辗转相除法】 program:

09.ABS
?a1 x ? b1 y ? c1 ? 0 ?a2 x ? b2 y ? c2 ? 0

解二元一次方程组 ? Program:

Input a1,b1,c1,a2,b2,c2 m=a1*b2-a2*b1 p=b1*c2-b2*c1 q=c1*a2-c2*a1 if m<>0 then x=p/m y=q/m print “x=”;x;”y=”;y else if p=0 or q=0 then print “this binary linear equation group has numberless solution” else print “this binary linear equation group has no solution” end if end if end

input “m=”;m input “n=”;n if m<n then t=m m=n n=t end if r=1 while r>0 r= m mod n if r=0 then print “the greatest common divisor of m and n is”;n else m=n n=r end if wend end

12.BAS 把三个数 a,b,c 按从大到小的顺序排列 input a,b,c if a<b then t=a a=b b=t end if if a<c then t=a a=c c=t end if if b<c then t=b b=c c=t end if print a,b,c end 13.BAS 把三个数 a,b,c 按从大到小的顺序排列 program: input “a=”;a input “b=”;b input “c=”;c if a>=b then if a>=c then if b>=c then print a,b,c else print a,c,b end if else print c,a,b end if else if b>=c then if a>=c then print b,a,c else print b,c,a end if else print c,b,a end if end if end

14.BAS 任给一个大于 1 的自然数,判断这个 数的奇偶性。 program input “n=”;n if n=2 then print “the number you input is a prime” else i=2 do r=n mod i i=i+1 loop until i>n-1 or r=0 if r=0 then print “the number is not a prime” else print “the number is a prime” end if end if end 15.BAS 求和: 2 ? ? ? ? ?? ? input “n=”;n i=1 s=0 while i<=n s=s+(i+1)/i i=i+1 wend print “s=”;s end 16.BAS 求和: 2 ? ? ? ? ?? ? input “n=”;n i=1 s=0 do s=s+(i+1)/i i=i+1 loop until i>n print “s=”;s end
3 2 4 3 5 4 n ?1 n 3 2 4 3 5 4 n ?1 n

17.求一个数的方根,开方 (The extraction of a root of a quantity) (extraction of root)方根,开方 program: input x,n m=1/n y=x^m print y end

20.BAS 计算当 x=1,2,3…20 时,函数 f (x) ? x2 ? 3x ? 5 的函数值 x=1 while x <=20 y=x^2-3*x+5 print :x=”;x;”y=’;y x=x+1 wend end 21.BAS 计算当 x=1,2,3…20 时,函数 f (x) ? x2 ? 3x ? 5 的函数值 x=1 do

18.BAS 求一个数的算术平方根 program: input “x=”;x if x>=0 then print “arithmetic square root is”;sqr(x) else print “no arithmetic square root” end 19.BAS 判断年份是闰年的程序 input “your year is”;x if x mod 4=0 and x mod 100<>0 then print “the year is leap year” else if x mod 400=0 then print “the year is leap year” else print “the year is not leap year” end if end if end end if

y=x^2-3*x+5 print :x=”;x;”y=’;y x=x+1 loop until x>20 end 22.BAS (阶乘 factorial) 用程序计算 n 的阶乘 input “n=”;n if n=0 then print “0!=1” else if n>=1 then i=1 f=1 while i<=n f=f*i i=i+1 print “the number factorial is”;f wend end if end if end 如果输出语句改为: print n; “!=”;f 则屏幕显示为:n!=f 0!=1 1!=1 2!=2 3!=6 4!=24 5!=120

23.BAS 输出 1 到 100 之间的偶数 PROGRAM: i=1 While i<=100 i=i+1 r=i mod 2 if r=0 then Print i; end if Wend End 说明:输出语句末加分号表示按行 输出,否则按列输出 24.BAS 输出 1 到 100 之间的偶数 PROGRAM: i=1 do

26.BAS 输出 1 到 100 之间的 3 的倍数 PROGRAM: i=1 While i<=100 i=i+1 r=i mod 3 if r=0 then Print i; end if Wend End 27.BAS 输出 1 到 100 之间的 3 的倍数 PROGRAM: i=1 do

i=i+1 r=i mod 2 if r=0 then print i; end if loop until i>100 End 25.BAS 输出 1 到 100 之间的偶数 PROGRAM: i=1 do

i=i+1 r=i mod 3 if r=0 then print i; end if loop until i>100 End 28.BAS 输出 1 到 100 之间的 3 的倍数 PROGRAM: i=1 do

r=i mod 2 if r=0 then print i; end if i=i+1 loop until i>100 End

r=i mod 2 if r=0 then print i; end if i=i+1 loop until i>100 End

29.BAS 求两个正整数的最大公约数 【辗转相除法】 program: input “m=”;m input “n=”;n if m<n then t=m m=n n=t end if do r= m mod n if r=0 then print “the greatest common divisor of m and n is”;n else m=n n=r end if loop until r=0 end 30.BAS 求两个正整数的最大公约数 【辗转相除法】 the program is : 1:input m,n 2:if m<n then t=m m=n n=t end if 3:r=m mod n 4:if r=0 then if n=1 then print “two number is each other prime number” else print n end if else m=n n=r goto 3 end if 5:end

30.BAS 求 5 次多项式 f ( x) ? a5 x5 ? a4 x4 ? a3 x3 ? a2 x2 ? a1x ? a0 当 x ? x0 时的什值 program : input a5,a4,a3,a2,a2,a1,a0 input x0 n=1 v=a5 while n<=5 i=5-n v=v*x0+ai n=n+1 wend print v end


赞助商链接
更多相关文档:

高中数学必修三知识点大全

高中数学必修三知识点大全 - 知识点串讲 必修三 /27 1 第一章:算法 1. 1.1 算法的概念 1、算法(algorithm)一词源于算术(algorism),即算术方法,是指一个由...

高中数学必修三算法和程序框图练习题

高中数学必修三算法和程序框图练习题_数学_高中教育_教育专区 暂无评价|0人阅读|0次下载|举报文档 高中数学必修三算法和程序框图练习题_数学_高中教育_教育专区。...

人教版高中数学必修三程序测试题

人教版高中数学必修三程序测试题_数学_高中教育_教育专区 暂无评价|0人阅读|0次下载|举报文档 人教版高中数学必修三程序测试题_数学_高中教育_教育专区。2013-2014...

必修三程序框图

必修三程序框图_数学_高中教育_教育专区。《1.1 算法与程序框图(1)》测试题 一、选择题 1.下列关于算法的描述正确的是( A.算法与求解一个问题的方法相同 B....

高中数学必修三知识点总结

高中数学必修三知识点总结 - 高中数学必修 3 知识点 第一章 算法初步 1.1.1 算法的概念 1、算法概念: 在数学上, 现代意义上的 “算法” 通常是指可以用...

高中数学必修三程序框图导学案及课后作业加答案

高中数学必修三程序框图导学案及课后作业加答案_高一数学_数学_高中教育_教育专区。1.1.1 算法的概念 【学习要求】 1.了解算法的含义,体会算法的思想; 2.能够...

高中数学必修三知识点总结

高中数学必修三知识点总结_数学_高中教育_教育专区。知识点总结,典型例题分析 第一章 算法初步一、算法与程序框图 1.算法:算法指的是用阿拉伯数字进行算术运算的...

高中数学必修3知识点总结

高中数学必修3知识点总结_社会学_人文社科_专业资料。高中数学必修三 ...“语句”表示满足条件时 执行的操 作内容,条件不满足时,结束程序;END IF 表示...

高中必修三数学总结·【最全】!

高中必修三数学总结·【最全】!_高三数学_数学_高中教育_教育专区。学习资料 ...(1)表达式是指算法和程序要求输出的信息; (2)提示内容提示用户要输出的是什么...

数学必修三知识系统汇总

数学必修三知识系统汇总_高一数学_数学_高中教育_教育专区。此为高中新课标数学必修...当型循环的结构特征 二、基本算法语句 1.任何一种程序设计语言中都包含五种...

更多相关标签:
网站地图

文档资料共享网 nexoncn.com copyright ©right 2010-2020。
文档资料共享网内容来自网络,如有侵犯请联系客服。email:zhit325@126.com