function nccq()
print("//数量_n1,时_t1,数量_n2,时_t2,系数_k(↑+1,↓-1),系数_k0(求数量0,求时间它值)\n")
variable v=input("[n1,t1,n2,t2,k,k0]⇒")
variable n1=v[0]
variable t1=v[1]
variable n2=v[2]
variable t2=v[3]
variable k=v[4]
variable k0=v[5]
if(k0==0)
variable t=input("问题时间t:")
return nccqt(n1,t1,n2,t2,k,t)
else
variable n=input("问题数量n:")
return nccqn(n1,t1,n2,t2,k,n)
endif
endf
function nccqt(n1,t1,n2,t2,k,t)
variable da=abs(n1*t1-n2*t2)/abs(t2-t1)
variable a=t1*(n1-k*da)=t2*(n2-k*da)
variable n=a/t+k*da
variable nx="[单位增量_da,原有量_a,数量_n]"+"⇒\n"
variable ny="[单位减量_da,原有量_a,数量_n]"+"⇒\n"
if(k==1)
print(nx)
endif
if(k==-1)
print(ny)
endif
return [da,a,n]
endf
function nccqn(n1,t1,n2,t2,k,n)
variable da=abs(n1*t1-n2*t2)/abs(t2-t1)
variable a=t1*(n1-k*da)=t2*(n2-k*da)
variable t=a/(n-k*da)
variable tx="[单位增量_da,原有量_a,可用时_t]"+"⇒\n"
variable ty="[单位减量_da,原有量_a,可用时_t]"+"⇒\n"
if(k==1)
print(tx)
endif
if(k==-1)
print(ty)
endif
return [da,a,t]
endf

某草场可供20头牛吃10天，15头牛吃15天，而且草每天都增长一定的量，问1:该草场的草可供30头牛吃多少天？答:10
问2:该草场的草10天吃完,求牛头数？答:30