高中数学必修三程序大全.docVIP

Program and list(应用程序和目录) 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 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 求值 Input “a=”;a; Input “b=”;b Print “s=”;a^b+b^a End 04.BAS 求一个数的绝对值 Input “x=”;x Let y=abs(x) Print “the number a