发几个简单的算法 - mfp吧

level 5

求两数的比值
function bi(a,b)
variable aa=a , bb=b , c=0 , d=0 , hh=true
if(a==b)
print("两数之比为1:1")
hh=false
endif
while(hh)
if(a>b)
c=mod(a,b)
if(c==0)
d=b
hh=false
print("两数之比为"+aa/d+":"+bb/d)
else
a=c
endif
else
c=mod(b,a)
if(c==0)
d=a
hh=false
print("两数之比为"+aa/d+":"+bb/d)
else
b=c
endif
endif
loop
endf

2016年08月23日 17点08分 1

level 5

小小鱼大泡泡楼主

用求根公式求一元二次方程的解
function yyec(a,b,c)
variable x=0,y=0
if((b**2-4*a*c)<0)
print("此方程无解")
else
if((b**2-4*a*c)==0)
x=-b/(2*a)
print("x的值为"+x)
else
x=(-b+(b**2-4*a*c)**0.5)/(2*a)
y=(-b-(b**2-4*a*c)**0.5)/(2*a)
print("x1的值为"+x+"\n")
print("x2的值为"+y+"\n")
endif
endif
endf

2016年08月23日 17点08分 2

小小鱼大泡泡

求a.X²+b.X+c=0的根，用solve算的结果无论何时都是得出两个解(两个不同虚数解，或两个一样的解，或者两个不同实数解)

2016年08月23日 17点08分

😄二师兄他师哥

a=3,b=4,c=3,根roots([3,4,3])

2016年08月23日 22点08分

小小鱼大泡泡

@😄二师兄他师哥还是得出两个虚数根，需要求虚数根的时候才用，现在大部分学生只需要求实数根

2016年08月24日 01点08分

level 5

小小鱼大泡泡楼主

求排列的值
function aa(m,n)
variable a=1,b=1
for variable g=1 to n step 1
a=a*g
next
for variable h=1 to (n-m) step 1
b=b*h
next
return a/b
endf

2016年08月23日 17点08分 3

小小鱼大泡泡

m≤n

2016年08月23日 17点08分

😄二师兄他师哥

nPr(3,2)

2016年08月23日 22点08分

小小鱼大泡泡

@😄二师兄他师哥有了吗 [汗]

没看到

2016年08月24日 01点08分

level 5

小小鱼大泡泡楼主

求组合的值
function cc(m,n)
variable a=1,b=1,c=1
for variable g=1 to n step 1
a=a*g
next
for variable h=1 to m step 1
b=b*h
next
for variable j=1 to (n-m) step 1
c=c*j
next
return a/(b*c)
endf

2016年08月23日 17点08分 4

小小鱼大泡泡

m≤n

2016年08月23日 17点08分

😄二师兄他师哥

function cc(m,n) return nCr(n,m) endf n>=m

2016年08月23日 22点08分

小小鱼大泡泡

@😄二师兄他师哥这个也有了 [黑线]