当前位置:首页 >> 数学 >>

高中数学必修三程序大全


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


相关文章:
高中数学必修3程序框图练习题
高中数学必修3程序框图练习题_数学_高中教育_教育专区。练习题 1、根据右边程序框图,当输入 10 时,输出的是( ) A.12 B.19 C.14.1 D.30 的值,则判断框...
高中数学必修三主要内容
高中数学必修三主要内容_数学_高中教育_教育专区。第一章 算法初步 1.1 算法与程序图框 1. 算法的含义:在数学中,主要研究计算机能实现的算法,即按照某种机械程序...
高中数学必修3知识点总结
高中数学必修 3 知识点一:算法初步 1:算法的概念 (1)算法概念:在数学上,现代意义上的“算法”通常是指可以用计算机来解决的某一类问题是程序 或步骤,这些程序...
数学必修3程序框图专题复习
数学必修3程序框图专题复习_高一数学_数学_高中教育_教育专区。数学必修3程序框图专题复习 八、程序框图 程序框图.这类题主要考察考生对框图中所给算法语句的理解与...
高中数学必修3公式全部
高中数学必修 3 公式全部 1 过两点有且只有一条直线 2 两点之间线段最短 3 同角或等角的补角相等 4 同角或等角的余角相等 5 过一点有且只有一条直线和...
高中数学必修3程序框图练习
高中数学必修3程序框图练习_高二数学_数学_高中教育_教育专区。程序框图练习高一数学练习 1——程序框图班级 座号 姓名)开始 i ? 0, S ? 1 1 .执行如右图所...
高中数学必修三算法和程序框图练习题
高中数学必修三算法和程序框图练习题_数学_高中教育_教育专区 暂无评价|0人阅读|0次下载|举报文档 高中数学必修三算法和程序框图练习题_数学_高中教育_教育专区。...
必修3_高中数学_教学视频大全
视频教程,数学直通车全套教学,在线学习高中数学课程,必修3视频下载... 必修3。没有最好,只有更好,实时更新。默认为...(人教版) 01 1.1 算法与程序框图(一) 14...
人教版高中数学必修三程序测试题
人教版高中数学必修三程序测试题_数学_高中教育_教育专区 暂无评价|0人阅读|0次下载|举报文档 人教版高中数学必修三程序测试题_数学_高中教育_教育专区。2013-2014...
高中数学必修三算法知识点总结
高中数学必修 3 知识点总结第一章 算法初步 1.1.1 算法的概念 1、算法概念: 在数学上,现代意义上的“算法”通常是指可以用计算机来解决的某一类问题是程序或...
更多相关标签:
高中数学必修公式大全 | 高中数学必修1 | 高中数学必修一 | 高中数学必修4 | 高中数学必修5 | 高中数学必修一视频 | 高中数学必修2 | 高中数学必修二 |